假設我們具有以下功能：foo <- function(x){ line1 <- x line2 <- 0 line3 <- line1 + line2 return(line3)}我們想將第二行更改為： line2 <- 2你會怎么做？一種方法是使用fix(foo)并更改功能。另一種方法是再次編寫該函數。還有另一種方法嗎？（請記住，任務是僅更改第二行）我想要以某種方式將函數表示為字符串的向量（嘛，字符），然后更改其值之一，然后再次將其轉換為函數。
3 回答
叮當貓咪
TA貢獻1776條經驗 獲得超12個贊
> body(foo)[[3]] <- substitute(line2 <- 2)
> foo
function (x)
{
line1 <- x
line2 <- 2
line3 <- line1 + line2
return(line3)
}
（“ {”是body（foo）[[1]]，每一行都是列表的后續元素。）
海綿寶寶撒
TA貢獻1809條經驗 獲得超8個贊
您可以使用“ body ”功能。此函數將返回函數的主體：
fnx = function(a, b) { return(a^2 + 7*a + 9)}
body(fnx)
# returns the body of the function
因此，“編輯”功能的一種好方法是在賦值語句的左側使用“ body”：
body(fnx) = expression({a^2 + 11*a + 4})
- 3 回答
- 0 關注
- 495 瀏覽
添加回答
舉報
0/150
提交
取消