R 计算数据框中每15行的平均值、最小值和最大值

我有一个77列1080行的数据帧 我想减少我的数据，因此，我想为每一列：找到每15行的最小值、最大值和平均值。 例如，对于第一列，我希望每15行查找一次min、max、mean，对于第二列，所有77列都是相同的，依此类推，并将所有这些放在一个数据帧中。我怎么做？

---

谢谢

我们可以使用

gl

创建一个分组变量，然后使用

summary\u all

library(dplyr)
df %>% 
   group_by(group = as.integer(gl(n(), 15, n()))) %>% 
   summarise_all(funs(min, max, mean))

数据

set.seed（24）
df我们可以使用
gl
创建一个分组变量，然后使用
summary\u all

library(dplyr)
df %>% 
   group_by(group = as.integer(gl(n(), 15, n()))) %>% 
   summarise_all(funs(min, max, mean))

数据
set.seed（24）
df使用基本R和应用函数：

# dummy data from akrun
df1 <- data.frame(matrix(rnorm(77*1080, 0, 1), ncol = 77))

# Vectors with means, mins, and maxes for each row
means <- apply(df1, 1, mean)
mins  <- apply(df1, 1, min)
maxs  <- apply(df1, 1, max)

# Make to a data frame
df2 <- data.frame(means[seq(1, 1080, 15)], mins[seq(1, 1080, 15)], maxs[seq(1, 1080, 15)])

#来自akrun的虚拟数据
df1使用基本R和应用函数：

# dummy data from akrun
df1 <- data.frame(matrix(rnorm(77*1080, 0, 1), ncol = 77))

# Vectors with means, mins, and maxes for each row
means <- apply(df1, 1, mean)
mins  <- apply(df1, 1, min)
maxs  <- apply(df1, 1, max)

# Make to a data frame
df2 <- data.frame(means[seq(1, 1080, 15)], mins[seq(1, 1080, 15)], maxs[seq(1, 1080, 15)])

#来自akrun的虚拟数据
这似乎真的很有用，但我想我没有正确地说出我想做什么。对于每一列，我希望：每15行查找最小值、最大值、平均值！谢谢你的回答！这似乎真的很有用，但我想我没有正确地说出我想做什么。对于每一列，我希望：每15行查找最小值、最大值、平均值！谢谢你的回答！
df1 <- df1[seq(1, 1080, 15),]
df2 <- data.frame("Mean" = apply(df1, 1, mean), "Min" = apply(df1, 1, min), "Max" = apply(df1, 1, max))