r - 按组计算摘要并将值带回数据框中

Question

This question already has answers here:

Calculate group mean (or other summary stats) and assign to original data

(4 个回答)


3年前关闭。

df <- data.frame(
id = c('A1','A2','A4','A2','A1','A4','A3','A2','A1','A3'),
value = c(4,3,1,3,4,6,6,1,8,4))

我想在每个 id 组中获得最大值。我尝试了以下但得到一个错误说替换有 4 行和数据有 10 我理解但不知道如何更正

df$max.by.id <- aggregate(value ~ id, df, max)  

这就是我最终成功做到的方式

max.by.id <- aggregate(value ~ id, df, max)  
names(max.by.id) <- c("id", "max")
df2 <- merge(df,max.by.id, by.x = "id", by.y = "id")
df2
#   id value max
#1  A1     4   8
#2  A1     4   8
#3  A1     8   8
#4  A2     3   3
#5  A2     3   3
#6  A2     1   3
#7  A3     6   6
#8  A3     4   6
#9  A4     1   6
#10 A4     6   6

有什么更好的方法吗？提前致谢

最佳答案

ave() 是该任务的函数:

df$max.by.id <- ave(df$value, df$id, FUN=max) 

例子:

df <- data.frame(
  id = c('A1','A2','A4','A2','A1','A4','A3','A2','A1','A3'),
  value = c(4,3,1,3,4,6,6,1,8,4))

df$max.by.id <- ave(df$value, df$id, FUN=max) 

ave() 的结果与原始值向量的长度相同(也是分组变量的长度)。结果的值将到达相对于分组变量的正确位置。有关更多信息，请阅读 ave() 的文档。

关于r - 按组计算摘要并将值带回数据框中，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/34337651/

上一篇：r - Y 轴上带有百分比的累积直方图

下一篇：concurrency - 如何告诉多核/多 CPU 机器并行处理循环中的函数调用？

Answer 1

ave() 是该任务的函数:

df$max.by.id <- ave(df$value, df$id, FUN=max) 

例子:

df <- data.frame(
  id = c('A1','A2','A4','A2','A1','A4','A3','A2','A1','A3'),
  value = c(4,3,1,3,4,6,6,1,8,4))

df$max.by.id <- ave(df$value, df$id, FUN=max) 

ave() 的结果与原始值向量的长度相同(也是分组变量的长度)。结果的值将到达相对于分组变量的正确位置。有关更多信息，请阅读 ave() 的文档。