我制作了一個函式,可以在多個物件上應用多個函式。我將它們放在串列中,因為這一切都應該包含在一個函式中
myFunc <- function(...) {
myApply <- function(...){
flist <- list(min, max, mean, sum)
lapply(flist, function(f) f(...))
}
# apply function to several objects
lapply(list(...), myApply)
}
obj1 <- c(1:9)
obj2 <- c(1:7)
myFunc(obj1, obj2)
我的問題是如何呼叫不是串列中的所有函式,例如,只有其中兩個:
myFunc(obj1, obj2, list(min, max)). 另外,也許有人知道如何使這種結構更整潔?
uj5u.com熱心網友回復:
這種方法怎么樣?
myFun <- function(...,fns) lapply(fns,\(i) lapply(list(...),i))
用法:
myFun(obj1,obj2, fns=list(min, max))
轉載請註明出處,本文鏈接:https://www.uj5u.com/houduan/485296.html
下一篇:新版D3如何獲取節點?
