获取每个元素的平均值

【问题标题】：Getting the average for each elements获取每个元素的平均值
【发布时间】：2019-03-29 20:07:31
【问题描述】：

我有一个“商店”数据，其中包括 product1/2 的价格、销售额和商店名称。我想计算每家商店的产品销售平均值。

选择1号店铺

Store1=Store[(Store$StoreNum==1),]

从商店 1 计算手段

STORE1  =colMeans(Store1[c("p1price","p2price")])

通过这样做，我可以获得单独的答案，但有没有办法一次计算每个商店的平均值？

我想用非常基础的 R 来解决这个问题，而不是复杂化。

【问题讨论】：

标签： r

【解决方案1】：

我们可以用dplyr 表示group_by。在 group by 语句中使用“StoreNum”，并使用summarise_at，循环遍历感兴趣的列以获取mean

library(dplyr)
df1 %>%
   group_by(StoreNum) %>%
   summarise_at(vars(matches("price")), mean, na.rm = TRUE)

或者使用来自base R的aggregate

aggregate(StoreNum ~ ., df1[c("StoreNum", "p1price","p2price")], mean)

【讨论】：