为每列平均多行数，多次
为每列平均多行数，多次
提问于 2022-04-29 12:47:00
这里我有我的数据集的片段。行表示一年中不同的日子。
变电站代表个体，有500多个个体。这10分钟的时间段一直持续到24小时。
我需要为这个数据集中的每一个人每隔10分钟找到一个平均值。这将导致每个变电站的单行，每个时间间隔的平均值。
我试过：
meanbygroup <- stationgroup %>%
group_by(Substation) %>%
summarise(means = colMeans(tenminintervals[sapply(tenminintervals, is.numeric)]))但是，这是整个列的平均值，每个变电站的平均值都是相同的。
所以对于每个变电站，我需要每个时间间隔的平均值。
请帮帮我！
回答 1
Stack Overflow用户
回答已采纳
发布于 2022-04-29 13:24:02
尝试使用summarize(across())，如下所示：
df %>%
group_by(Substation) %>%
summarize(across(everything(), ~mean(.x, na.rm=T)))输出：
Substation `00:00` `00:10` `00:20`
<chr> <dbl> <dbl> <dbl>
1 A -0.233 0.110 -0.106
2 B 0.203 -0.0997 -0.128
3 C -0.0733 0.196 -0.0205
4 D 0.0905 -0.0449 -0.0529
5 E 0.401 0.152 -0.0957
6 F 0.0368 0.120 -0.0787
7 G 0.0323 -0.0792 -0.278
8 H 0.132 -0.0766 0.157
9 I -0.0693 0.0578 0.0732
10 J 0.0776 -0.176 -0.0192
# … with 16 more rows输入：
set.seed(123)
df = bind_cols(
tibble(Substation = sample(LETTERS,size = 1000, replace=T)),
as_tibble(setNames(lapply(1:3, function(x) rnorm(1000)),c("00:00", "00:10", "00:20")))
) %>% arrange(Substation)
# A tibble: 1,000 × 4
Substation `00:00` `00:10` `00:20`
<chr> <dbl> <dbl> <dbl>
1 A 0.121 -1.94 0.137
2 A -0.322 1.05 0.416
3 A -0.158 -1.40 0.192
4 A -1.85 1.69 -0.0922
5 A -1.16 -0.455 0.754
6 A 1.95 1.06 0.732
7 A -0.132 0.655 -1.84
8 A 1.08 -0.329 -0.130
9 A -1.21 2.82 -0.0571
10 A -1.04 0.237 -0.328
# … with 990 more rows页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/72058218
复制相关文章
相似问题
腾讯云开发者
