我有以下数据:

x <- 11
w <- "12AAB"
y <- "var1"

我也有一个函数 funky(x,w,y){}
将上述 3 个常量作为输入,我可以应用以下内容:
funky(x = x, w = w, y = y)

它导入一堆数据并执行一些计算并将文件保存在特定文件夹中。但是,我现在想将该函数扩展到不同的“var”,其中 y 是字符向量。例如;
x <- 11
w <- "12AAB"
y <- c("var1", "va2", "var3")

如何使用 lapply 使用 x = 11w = 12AAB 运行该函数,然后首先使用 y = var1 运行,然后使用 y = var2 等。

我没有任何特定的东西可以应用这个函数,所以我不能使用 lapply(data, funky)

最佳答案

您可以使用 y 、硬编码 lapplyx 迭代 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])

关于r - R 中的函数,不指定数据,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/52796166/

10-12 07:21