powered by
byteToBinary(x, endian=c("little", "big"))
x
library(oce) x <- 0:16 print(byteToBinary(x))
Run the code above in your browser using DataLab