我的文件functions.R
基本上是:
fun1 <- function(a,b) {
...
}
fun2 <- function(c,d) {
...
}
...
我想将其处理成一个列表,其中键是函数名称,元素是函数。这是为了在闪亮的应用程序上显示。所以最终产品是:
my_fun_list$fun1
有字符串
“fun1&lt; - function(a,b){...}”
有没有简单的方法可以做到这一点?
答案 0 :(得分:3)
试试这个:
e <- new.env()
sys.source("path/to/file.R", envir=e)
现在您可以访问R文件中的每个元素
e$myfunc()
获取函数的文本(感谢@Gregor):
eapply(e, capture.output)
会为每个文件提供character
个向量,但它将是剥离的函数,没有注释。