x <- c(65311, 65624, 65908, 66219, 66499, 66821, 67145, 67447)diff(x)max(x)min(x)mean(x)
Standard input is empty
[1] 313 284 311 280 322 324 302 [1] 67447 [1] 65311 [1] 66371.75
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!