如何将 lapply 与公式一起使用？答案

【问题标题】：How to use lapply with a formula?如何将 lapply 与公式一起使用？
【发布时间】：2011-10-23 23:20:06
【问题描述】：

我的 lapply 函数有问题，我没有找到之前发布的任何匹配问题。我需要对所有列表元素应用排列测试，但是我无法正确设置 lapply。

我正在尝试这个

testperm <- lapply(test-list, FUN=perm.test, formula=(cover ~ group))

函数 perm.test 来自包'exactRankTests' 封面是因（数值）变量，组是一个因素。

非常感谢任何有关如何应用此类功能的提示。詹斯

【问题讨论】：

标签： list r lapply

【解决方案1】：

当您使用公式时，您通常还需要为 data 参数提供一个值，以便函数知道要使用哪些数据。您的数据集将是列表元素，因此您需要使用匿名函数将它们提供给 perm.test。

在这种情况下尝试：

testperm <- lapply(test.list, FUN=function(x) perm.test(formula=(cover ~ group),data=x))

【讨论】：

【解决方案2】：

这是您需要查看的第三个参数。

lapply 采用（至少）两个参数，一个列表（包括数据框）和一个函数，FUN，对它进行操作：

data(iris)
df0 = iris[1:5,1:3]

fnx = function(v){v^2}

lapply(df0, fnx)

lapply 接受一个可选的 third 参数，该参数必须对应于 FUN 所需的附加参数，并且 not 由 lapply 的第一个参数数据结构提供：

lapply( df0[,1], quantile, probs=1:3/4)

【讨论】：