as.integer64(1:12)[1:3]
x <- as.integer64(1:12)
dim(x) <- c(3,4)
x
x[]
x[,2:3]
# \dontshow{
r <- c(runif64(1e3, lim.integer64()[1], lim.integer64()[2]), NA, -2:2)
stopifnot(identical(r, as.integer64(as.bitstring(r))))
# }
Run the code above in your browser using DataLab