[英]How to calculate number of days between two dates in one column in R
我有以下兩個數據框:
Date <- seq(as.Date("2013/1/1"), by = "day", length.out = 17)
x <-data.frame(Date)
x$discharge <- c("1000","1100","1200","1300","1400","1200","1300","1300","1200","1100","1200","1200","1100","1400","1200","1100","1400")
x$discharge <- as.numeric(x$discharge)
和
Date2 <- c("2013-01-01","2013-01-08","2013-01-12","2013-01-17")
y <- data.frame(Date2)
y$concentration <- c("1.5","2.5","1.5","3.5")
y$Date2 <- as.Date(y$Date2)
y$concentration <- as.numeric(y$concentration)
我正在嘗試使用以下代碼計算從一個日期到另一個日期的天數:
y %>%
mutate(BETWEEN0=as.numeric(difftime(Date2,lag(Date2,1))),BETWEEN=ifelse(is.na(BETWEEN0),0,BETWEEN0))%>%
select(-BETWEEN0)
導致:
Date2 concentration BETWEEN
1 2013-01-01 1.5 0
2 2013-01-08 2.5 7
3 2013-01-12 1.5 4
4 2013-01-17 3.5 5
但是,我需要的是在第一個日期旁邊打印的兩個日期之間計算的天數,例如
Date2 concentration BETWEEN
1 2013-01-01 1.5 7
2 2013-01-08 2.5 4
3 2013-01-12 1.5 5
4 2013-01-17 3.5 0
這意味着從2013-01-01到2013-01-07是7天,從2013-01-08到2013-01-12是4天,依此類推。
y%>%mutate(Between=as.numeric(lead(Date2,default = last(Date2))-Date2))
Date2 concentration Between
1 2013-01-01 1.5 7
2 2013-01-08 2.5 4
3 2013-01-12 1.5 5
4 2013-01-17 3.5 0
y%>%mutate(Between=as.numeric(c(diff(Date2),0)))
Date2 concentration Between
1 2013-01-01 1.5 7
2 2013-01-08 2.5 4
3 2013-01-12 1.5 5
4 2013-01-17 3.5 0
在基數R中:
transform(y,Between=as.numeric(c(diff(Date2),0)))
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.