R语言如何通过ID来给ID相同的数据添加指定数据？给指定行添加指定数据

各位朋友大家好，我遇到R语言初级数据处理问题，请求帮助.
如下图所示，我有数据ID,A,B.（其中ID和B是重复出现的数据）
我要将ID相同的数据A去除第一行的数据，在最后一行添加同一ID的B中的数据。（比如ID为1的标注为红色的数据中，我要将A数据中的第一行数字1删除，给最后一位添加对应的B中数字22，最终输出数据A1）,这个如何通过R语言实现呢？谢谢

1. dat <- data.frame(ID = rep(1:3, times = 4:6), A = c(1,3,5,8,1,4,2,3,2,9,4,5,5,7,8), B = rep(c(22, 55, 88), times = 4:6))
   
2. 
   
3. A1 <- dat$A
   
4. dup <- which(!duplicated(dat$ID))
   
5. dup2 <- c(dup[-1])
   
6. uniqueB <- unique(dat$B)
   
7. A1[dup2] <- uniqueB[-length(uniqueB)]
   
8. A1 <- c(A1[-1], uniqueB[length(uniqueB)])

复制代码

qoiqpwqr 发表于 2018-4-22 00:47

谢谢您的代码