使用dplyr的R中的日期数据
我的数据包含每个主题的两列日期数据,比如date1和date2,其中date1使用dplyr的R中的日期数据,r,dplyr,tidyverse,lubridate,R,Dplyr,Tidyverse,Lubridate,我的数据包含每个主题的两列日期数据,比如date1和date2,其中date1% 分组依据(受试者)%>% mutate(new=as.integer(lead(date1)
subject date1 date2
1 2018-01-01 2019-01-01
1 2018-02-01 2019-01-01
1 2020-01-01 2021-01-01
指标变量第一行应该是1,第二行应该是0,第三行应该是NA。我们可以使用
lead
在按“主题”分组后将下一个“date1”与当前的“date2”进行比较
library(dplyr)
df1 %>%
group_by(subject) %>%
mutate(new = as.integer(lead(date1) < date2))
# A tibble: 3 x 4
# Groups: subject [1]
# subject date1 date2 new
# <int> <date> <date> <int>
#1 1 2018-01-01 2019-01-01 1
#2 1 2018-02-01 2019-01-01 0
#3 1 2020-01-01 2021-01-01 NA
库(dplyr)
df1%>%
分组依据(受试者)%>%
mutate(new=as.integer(lead(date1)
数据
df1请提供您已经尝试过的代码示例。可能重复
df1 <- structure(list(subject = c(1L, 1L, 1L), date1 = structure(c(17532,
17563, 18262), class = "Date"), date2 = structure(c(17897, 17897,
18628), class = "Date")), .Names = c("subject", "date1", "date2"
), row.names = c(NA, -3L), class = "data.frame")