t1<-as.POSIXct("2017-03-02 11:58:20")
t2<-as.POSIXct("2017-03-02 12:00:05")
print(lubridate::as.duration(lubridate::interval(t1,t2)))
[1] "105S (~ 175 분)"HH : MM : SS 형식으로 지속 시간을 인쇄 할 수 있습니까? MM : SS
그것은 HH로 표현 된 길이를 갖는 것이 가능하다? 따라서이 경우에는 다음과 같습니다
0시 1분 45초
당신은 sprintf
library(lubridate)
td <- seconds_to_period(difftime(t2, t1, units = "secs"))
sprintf('%02d:%02d:%02d', [email protected], minute(td), second(td))
#[1] "00:01:45"
이 함께 lubridate에서 seconds_to_period을 사용할 수 있습니다 이전 논의를 기반으로 - Converting seconds to days: hours:minutes:seconds in r?
윤활유 사고 방식에 머무르기 :
t1<-as.POSIXct("2017-03-02 11:58:20")
t2<-as.POSIXct("2017-03-02 12:00:05")
dur <- lubridate::as.period(lubridate::as.duration(lubridate::interval(t1,t2)))
sprintf('%02d %02d:%02d:%02d', day(dur), hour(dur), minute(dur), second(dur))
일반적으로 기간 클래스는 정확하지 않을 수 있지만 (윤일 등) 처음에는 기간을 지났으므로 올바르게되어야합니다.