# Example 9 Chapter 3 Page no.: 51 # COnversion of integer to 16 bit Binary x <- -32768 install.packages("binaryLogic") library("binaryLogic") y <- as.binary(x, size=2, n=0, logic=FALSE) cat("The integer",x,"can be represented as",print(y),"in 16 Bit binary format")