x <- c(65311, 65624, 65908, 66219, 66499, 66821, 67145, 67447)
diff(x)
max(x)
min(x)
mean(x)