R:将环境中的所有函数保存为 "txt"(记事本)文件
R: Save all functions within environment as a "txt" (notepad) file
我正在使用 R 编程语言。
假设我在环境中定义了 3 个函数:
#function 1
function_1 <- function(x1, x2) {
var_1 <- sin(x1 + x2)
var_2 <- cos(x1 - x2)
goal_1 = sum(var_1 + var_2)
return(goal_1)
}
#function 2
function_2 <- function(x1, x2) {
var_1 <- sin(x1 + x2)
var_2 <- cos(x1 - x2)
goal_1 = sum(var_1 - var_2)
return(goal_1)
}
#function 3
function_3 <- function(x1, x2) {
var_1 <- sin(x1 + x2)
var_2 <- cos(x1 - x2)
goal_1 = sum(var_1 * var_2)
return(goal_1)
}
我发现了这个 Whosebug post (Save all functions in an txt file),它展示了如何获取环境中的所有函数并将它们保存为“rds”文件L
#save everything within the environment as a "rds" file:
dump(lsf.str(), file="essay_4_code.R")
但是有没有什么可以直接将这些函数保存为txt/notepad文件呢?我知道我可以在 R 中打开这个文件(“essay_4_code.R”),然后 copy/paste 所有文本到记事本文件中,然后保存记事本文件 - 但是有什么可以让我直接执行此操作?
谢谢
@Ravaksha 提供的答案:
dump(lsf.str(), file="essay_4_code.txt")
我正在使用 R 编程语言。
假设我在环境中定义了 3 个函数:
#function 1
function_1 <- function(x1, x2) {
var_1 <- sin(x1 + x2)
var_2 <- cos(x1 - x2)
goal_1 = sum(var_1 + var_2)
return(goal_1)
}
#function 2
function_2 <- function(x1, x2) {
var_1 <- sin(x1 + x2)
var_2 <- cos(x1 - x2)
goal_1 = sum(var_1 - var_2)
return(goal_1)
}
#function 3
function_3 <- function(x1, x2) {
var_1 <- sin(x1 + x2)
var_2 <- cos(x1 - x2)
goal_1 = sum(var_1 * var_2)
return(goal_1)
}
我发现了这个 Whosebug post (Save all functions in an txt file),它展示了如何获取环境中的所有函数并将它们保存为“rds”文件L
#save everything within the environment as a "rds" file:
dump(lsf.str(), file="essay_4_code.R")
但是有没有什么可以直接将这些函数保存为txt/notepad文件呢?我知道我可以在 R 中打开这个文件(“essay_4_code.R”),然后 copy/paste 所有文本到记事本文件中,然后保存记事本文件 - 但是有什么可以让我直接执行此操作?
谢谢
@Ravaksha 提供的答案:
dump(lsf.str(), file="essay_4_code.txt")