Utility function for attaching functions?

[Mullefa]

(probably) dubious implementation, but something like:

cluster_assign_func <- function(cl, f) {
  fname <- as.character(substitute(f))
  stopifnot(is.function(f))
  cluster_assign_value(cl, fname, f)
}

[julou]

I find it indeed useful… I also derived the following to attach any object:

cluster_assign_obj <- function(cl, x) {
  name <- as.character(substitute(x))
  stopifnot(exists(name))
  cluster_assign_value(cl, name, x)
}

[cboettig]

:+1: @Mullefa thanks for the implementation. Given that parallelizing do() over a complex function call is probably one of the more promising use cases, a utility function like this would be great.

[hadley]

Implemented as cluster_copy