dplyrで分とか時でgroup_by()したいときはlubridate::floor_date()

たとえばこういうデータがあって、分間に何レコードあるか数えたいとします。 library(dplyr) library(lubridate) set.seed(1) x <- runif(100, max = 60) d <- data.frame(timestamp = now() + seconds(cumsum(x))) head(d) #> timestamp #> 1 2015-09-22 07:18:16 #> 2 2015-09-22 07:18:38 #> 3 2015-09-22 07:19:13 #>…