FourBits <- Rmpfr::mpfr(matrix(0:31, 8, 4), precBits=4) ## 4 significant bits
dimnames(FourBits) <- list(0:7, c(0,8,16,24))
FourBits
HH:::showHex(FourBits)
HH:::showBin(FourBits)
HH:::showBin(FourBits, shift=TRUE)
HH:::showDec(FourBits)
TenFrac <- matrix((1:10)/10, dimnames=list(1:10, expression(1/x)))
TenFrac9 <- Rmpfr::mpfr(TenFrac, precBits=9) ## 9 significant bits
TenFrac9
HH:::showHex(TenFrac9)
HH:::showBin(TenFrac9)
HH:::showBin(TenFrac9, shift=TRUE)
HH:::showDec(TenFrac9)
HH:::showDec(TenFrac9, precBits=10)
Run the code above in your browser using DataCamp Workspace