!経過日数型

*difftime

日付型の変数同士の差分を取ると、difftime型のデータになる。

 > dd <- as.Date('2016/11/1')-as.Date('2016/10/10')
 > dd
 Time difference of 22 days
 > class(dd)
 [1] "difftime"