furrr 不会从全局环境中自动解析 S3 泛型方法

Question

我开发了一些使用大量本地函数和 S3 方法的代码。当我开始在 furrr 函数中使用 S3 方法时，全局变量的自动检测无法正常检测 S3 处理程序。

示例代码：

test <- function(x) UseMethod("test")
test.character <- function(x) cat("I am character", x)

furrr::future_map(as.character(1:10), test)

失败并出现以下错误：

Error in UseMethod("test") : 
  no applicable method for 'test' applied to an object of class "character"

我知道，我可以使用 furrr_options(globals = list(test.character = test.character))，但我需要一些通用的解决方案，不需要在全局变量中枚举 furrr 函数中使用的所有局部函数和 S3 方法。

有没有办法告诉 furrr 如何解析 S3 泛型方法？

Answer 1

我认为在全球工作环境中定义通用 S3 方法并不常见。通常这是包中发生的事情。

一个可能的解决方法是这个辅助函数，它将为您的全局泛型寻找所有 S3 方法。

get_all_generics <- function() {
  funs <- unlist(eapply(globalenv(), FUN = function(x) is.function(x) && utils::isS3stdGeneric(x)))
  gfuns <- names(funs[funs])
  mget(unlist(lapply(gfuns, methods)), envir=globalenv())
}
 
get_all_generics()
furrr_options(globals= get_all_generics())

furrr 不会从全局环境中自动解析 S3 泛型方法

furrr doesn't resolve S3 generic methods automatically from global environment

r

furrr