相关疑难解决方法(0)

假设我有一个这样的数据框:

set.seed(123)
df <- as.data.frame(cbind(y<-sample(c("A","B","C"),10,T), X<-sample(c(1,2,3),10,T)))
df <- df[order(df$V1),]

有一个简单的函数可以将V1求和(或任何FUN)V2并添加到df作为新列,这样:

df$sum <- c(6,6,8,8,8,8,6,6,6,6)
df

我可能会为此编写一个函数,但我必须经常这样做,并且最好知道实现它的最简单方法.