R 在多个函数上使用lappy

HierCluster

是数据帧列表

我可以得到一个集群的信息，如下所示：

tail(sort(colMeans(HierCluster[[i]])))

其中i是列表中的第i个元素

我使用lapply一次获取所有集群的信息：

lapply(lapply(lapply(HierCluster, colMeans), sort), tail)

---

但是使用lappy 3次似乎相当麻烦，有没有更实用的方法呢？

您可以创建一个结合了以下三种功能的匿名函数：

lapply(HierCluster, function(x) tail(sort(colMeans(x))))

---

您可以创建一个匿名函数，该函数结合了以下三种功能：

lapply(HierCluster, function(x) tail(sort(colMeans(x))))