［R］2つの時刻の時刻差を計算する

difftime関数を使用する。unitsオプションを使用することで、差の計算方法（何秒、何分、何時間など）を指定することができる。

以下の例では、tm1への代入後に、おおよそ10秒後にtm2への代入を行った。

> tm1 <- Sys.time()
> tm2 <- Sys.time()  # おおよそ10秒後に代入
> d <- difftime(tm2, tm1, units = "secs")
> d
Time difference of 10.08858 secs
> d <- difftime(tm2, tm1, units = "mins")
> d
Time difference of 0.168143 mins
> d <- difftime(tm2, tm1, units = "hours")
> d
Time difference of 0.002802383 hours

戻り値のモードは数値型。クラスはdifftime型。モードが数値型のため、戻り値の計算は簡単に行える。

> mode(d)
[1] "numeric"
> class(d)
[1] "difftime"
> d / 10
Time difference of 0.0002802383 hours