is.double(as.integer64(1))
as.integer64(1):9
match(as.integer64(2), as.integer64(0:3))
as.integer64(2) %in% as.integer64(0:3)
unique(as.integer64(c(1,1,2)))
rank(as.integer64(c(1,1,2)))
order(as.integer64(c(1,NA,2)))
# \dontshow{
stopifnot(identical(match(as.integer64(2), as.integer64(0:3)), match(2, 0:3)))
stopifnot(identical(as.integer64(2) %in% as.integer64(0:3), 2 %in% 0:3))
stopifnot(identical(unique(as.integer64(c(1,1,2))), as.integer64(unique(c(1,1,2)))))
stopifnot(identical(rank(as.integer64(c(1,1,2))), rank(c(1,1,2))))
stopifnot(identical(order(as.integer64(c(1,NA,2))), order(c(1,NA,2))))
stopifnot(identical(order(as.integer64(c(1,NA,2)), decreasing=TRUE), order(c(1,NA,2), decreasing=TRUE)))
# }
Run the code above in your browser using DataLab