# Datetime文字列のパース
> t1 <- strptime("May 11 08:42:20", format = "%b %d %H:%M:%S"
1. )
> t2 <- strptime("May 11 08:47:23", format = "%b %d %H:%M:%S")

# 時間の差分
> t2 - t1
Time difference of 5.05 mins

# 秒でくれ
> as.numeric(t2 - t1, units = "secs")
[1] 303
> 

• strptime: R: Date-time Conversion Functions to and from Character
• as.numeric: date - R Find time difference in seconds for YYYY-MM-DD HH:MM:SS.MMM format - Stack Overflow

追記 2018/05/16

は？ pic.twitter.com/Ar0WMU2FWw

— 全年齢リツイート先生 (@otiai10) 2018年5月16日

DRY