r - 总结在dplyr包: How to go around `Error: expecting a single value`

Question

我想按 ID、DRUG、FED 进行汇总，总结 DVID =1 和 DVID==2 的 CONC 之和>

df<- 
ID  DRUG  FED  DVID  CONC
1    1     1    1     20
1    1     1    2     40
2    2     0    1     30
2    2     0    2     100

我尝试使用这个:

df2 <- df %>% 
  group_by(ID,DRUG,FED) %>% 
  summarise(SumCOnc=CONC+lag(CONC))

但是我收到此错误:

Error: expecting a single value

当我使用mutate时，我没有收到错误。有没有办法解决这个问题，以便我在上述情况下使用 summarise ？

输出基本上应该是这样的:

ID  DRUG  FED  SumConc
1    1     1    60
2    2     0    130

Answer 1

这看起来非常简单:只需使用 sum()，不要乱用 lag() ...

获取数据:

df<- read.table(header=TRUE,
text="
ID  DRUG  FED  DVID  CONC
1    1     1    1     20
1    1     1    2     40
2    2     0    1     30
2    2     0    2     100
")

流程:

library(dplyr)
df %>% 
  group_by(ID,DRUG,FED) %>% 
  summarise(SumConc=sum(CONC))

##      ID  DRUG   FED SumConc
## 1     1     1     1      60
## 2     2     2     0     130