R 如何根据顺序序列从数据框中排除值

发布于01月13日

我在R中有一个数据框，看起来像这样

PatientID	Date	Dose	Creatinine
101	02.08.23	NA	65
101	03.08.23	1000	NA
101	04.08.23	1000	NA
101	04.08.23	NA	68
102	10.09.23	NA	89
102	10.09.23	1000	NA

每个患者有多行，每行只记录一种变量.

对于每个患者ID，我想删除在第一次服药前记录的肌酸值.因此，对于患者101，我想go 掉第一个肌酸值，对于患者102，我想保留第一个肌酸值.

我知道在第一次注射之前最多记录一个肌酸值，所以我只需要判断每个患者的第一次肌酸值，如果它是在第一次注射之前记录的.我就是不明白该怎么做！

我需要这样做的原因是计算每个患者的肌酸值的平均值，不包括我上面解释的值.

推荐答案

一旦您的Date变量是Date对象，只需使用filter即可完成此操作:

library(dplyr)

df |> 
  mutate(Date = as.Date(Date, "%m.%d.%y")) |>
  filter(Date >= Date[which(!is.na(Dose))[1]], .by = PatientID)

Date[which(!is.na(Dose))[1]]查找第一次非NA剂量的索引，然后使用该索引查找相应的日期.注意:这假设您的数据是按升序预先排序的(在您的示例中就是这样).

Output个

  PatientID       Date Dose Creatinine
1       101 2023-03-08 1000         NA
2       101 2023-04-08 1000         NA
3       101 2023-04-08   NA         68
4       102 2023-10-09   NA         89
5       102 2023-10-09 1000         NA

Data个

structure(list(PatientID = c(101L, 101L, 101L, 101L, 102L, 102L
), Date = c("02.08.23", "03.08.23", "04.08.23", "04.08.23", "10.09.23", 
"10.09.23"), Dose = c(NA, 1000L, 1000L, NA, NA, 1000L), Creatinine = c(65L, 
NA, NA, 68L, 89L, NA)), class = "data.frame", row.names = c(NA, 
-6L))