library(data.table)
library(bit64)
train <- fread("../input/train.csv")
test <- fread("../input/test.csv")
train$row_id <- NULL
summary(train$time)
summary(test$time)
max(test$time)