如何从子列表中的所有数据框中提取列，并使用此数据运行 Kruskal Wallis 测试?

Question

当我这样做时：

kruskal.test(sapply(list$`sublist`, "[", 14))

我能够在子列表中每个数据帧的第 14 列上运行测试。

但是，我需要在 1000 多个子列表上运行它，因此无法单独将其写出来。任何建议如何访问每个子列表中每个数据框的第 14 列，以仅对该子列表中的数据运行 Kruskal Wallis 测试？

基本上，我只需要一种方法来遍历子列表，但我不确定该怎么做。

感谢您的帮助！

Answer 1

只需在它之前添加另一个 *apply 函数：

lapply(list function(i) kruskal.test(sapply(i, "[", 14)))