数据框(df):
答案 0 :(得分:0)
数据强>
Data_point <- c('a','a','b','b','c','c')
Measurement <- c(2,4,6,8,4,10)
df <- data.frame(Data_point=Data_point, Measurement=Measurement)
您可以使用mean
和which
来选择所需的值。将它组合成一个函数可以得到你想要的结果。如上所述,可能已经存在一个函数(可能在tidyverse
中的某个地方),但这只与基数R一起使用。
average <- function(x) {
mean(df$Measurement[which(df$Data_point == x)])
}
sapply(unique(df$Data_point), average)
#[1] 3 7 7
答案 1 :(得分:0)
Columns.Count
答案 2 :(得分:0)
base R
选项为aggregate
aggregate(.~ Data_point, df1, mean)