[英]Binned physiological time series data in R: calculate duration spent in each bin
[英]How to calculate the duration in time series data with R?
像這樣使用dplyr::lag
怎么樣?
# Calculate time difference to previous date
mydata$diff <- mydata$t - dplyr::lag(mydata$t);
as.numeric(sum(mydata$diff[mydata$x < 2]))
#[1] 5
或者使用完整的tidyverse
方法:
require(tidyverse);
mydata %>%
mutate(diff = t - lag(t)) %>%
summarise(duration = sum(diff[x < 2]));
# duration
#1 5 days
mydata<-data.frame(
t = lubridate::ymd(c("2018-1-1", "2018-1-2", "2018-1-5", "2018-1-6", "2018-1-7", "2018-1-8")),
x = c(3, 1, 1, 3, 1, 3));
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.