R 从基线更改缺少基线点的重复ID

从基线更改缺少基线点的重复ID

下面提出并回答了一个类似的问题：

我的问题与原始问题的不同之处在于，我缺少基线值。我在下面列出了一个可复制的小示例：

df1 <- data.frame( probeID = c( rep("A", 19), rep("B",19), rep("C",19)),
                   Subject_ID = c( rep( c( rep(1,5), rep(2,4), rep(3,5), rep(4,5)),3)),
                   time = c(rep( c( c(1:5), c(2:5), rep( 1:5,2)),3)))
df1$measure <- df1$Subject_ID*c( 1:nrow(df1))

df2 <- subset( df1, Subject_ID != 2)

df2 %>%
  group_by(probeID, Subject_ID) %>%
  mutate(change = measure - measure[time==1])

---

df1在试图弄清楚您的问题是什么时遇到了一些问题，这有效吗

df1 %>%
  group_by(probeID, Subject_ID) %>%
  mutate(change = measure - first(measure))

这需要对列进行排序，因此您可能需要事先安排（probeID，Subject\u ID）