我有以下数据:
x <- 11
w <- "12AAB"
y <- "var1"
我还有一个功能funky(x,w,y){}
使用上述3个常量作为输入,我可以应用以下内容:
funky(x = x, w = w, y = y)
这将导入一堆数据并执行一些计算,然后将文件保存在特定的文件夹中。但是,我现在想将函数扩展到不同的“ vars”,其中y是字符向量。例如;
x <- 11
w <- "12AAB"
y <- c("var1", "va2", "var3")
我如何使用lapply
来使用x = 11
,w = 12AAB
来运行该函数,首先要使用y = var1
来运行,其次是y = var2
等。
我没有将功能应用到的特定内容,因此无法使用lapply(data, funky)
答案 0 :(得分:3)
您可以使用y
遍历lapply
,对x
和w
进行硬编码。
lapply(y, funky, x = x, w = w)
这将以funky
倍的n
长度y
运行,
funky(x = x, w = w, y = y[1])
funky(x = x, w = w, y = y[...])
funky(x = x, w = w, y = y[n])