Sự khác nhau giữa ngày tháng trong R

Question

Tôi có một vấn đề với các ngày trong R. Xác định T1 và T2 như ngày ở định dạng POSIXct hoặc POSIXlt với 6 giây phân đoạn:

op <- options(digits.secs = 6) 
T1 = strptime("2015.10.10 12:00:00.150150", "%Y.%m.%d %H:%M:%OS") 
T2 = strptime("2015.10.10 16:30:15.212412", "%Y.%m.%d %H:%M:%OS") 

Làm thế nào để có được sự khác biệt giữa T1 và T2 trong này định dạng:

format = "%H:%M:%OS" 

Ví dụ chênh lệch giữa ngày được xác định là:

diff = "04:30:15.062262" 

tôi đã cố gắng tiếp cận khác es, nhưng nó không thành công.

nỗ lực của tôi:

T1 = strptime("2015.10.10 12:00:00.150150", "%Y.%m.%d %H:%M:%OS") 
T2 = strptime("2015.10.10 16:30:15.212412", "%Y.%m.%d %H:%M:%OS") 
h = difftime(T2,T1, units = "hours") 
m = difftime(T2,T1, units = "mins") 
s = difftime(T2,T1, units = "secs") 

Nhưng tôi không biết làm thế nào để có được fractionals.

Answer 1

mã là tự giải thích được

x <- as.numeric(difftime(T2,T1,units = "sec")) # diff in sec 
hrs <- floor(x/3600) # get the hours 
x <- x%%3600   # update the x after removing the hrs(in sec) 
min <- floor(x/60) # get the minutes 
sec <- x%%60   # get the sec 

paste(hrs,min,sec,sep= ":") 
# [1] "4:30:15.0622620582581"