文章/答案/技术大牛

发布

问两个事件的百分比差异
EN

Stack Overflow用户

提问于 2015-01-07 05:29:52

回答 1查看 1.9K关注 0票数 3

我有一个数据框架，如下所示：

df1 <- 

ID event  CONC
1   1      5
1   2      10
3   1      7
3   2      10

对于每一行，我希望计算两个事件之间集中度的百分比差异，并将其添加到新列中。

例如:对于ID=1

diff <- (10-5)*100

我需要帮助如何为每个单独的行指定(CONCrow2-CONCrow 1)。然后，我可以使用下面的ID来应用它：

df2 <- df1 %>%
 group_by(ID) %>%
 mutate (percent = ....)

回答已采纳

发布于 2015-01-07 05:33:36

你可以试试

library(dplyr)
df1 %>% 
    group_by(ID) %>% 
    mutate(percent=100*(CONC-lag(CONC)))

或者使用base R

transform(df1, percent=ave(CONC, ID, FUN=function(x) 100*c(NA, diff(x))))

或者使用data.table

library(data.table)
setDT(df1)[, percent := 100*c(NA, diff(CONC)), ID]

更新

基于@Jan的评论，shift是data.table_1.9.5 (devel版本)中的一个新选项。

 setDT(df1)[,percent := 100*(CONC - shift(CONC)), by=ID][]

票数 6

页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持

原文链接：

https://stackoverflow.com/questions/27812975

复制

相似问题

问两个事件的百分比差异EN