powered by
switchEndianess(x)
x <- as.binary(c(1,1,0,0), logic=TRUE); print(x); summary(x); y <- switchEndianess(x); print(y); summary(y); neg_two <- as.binary(-2) as.raw(neg_two) as.raw(switchEndianess(neg_two))
Run the code above in your browser using DataLab