library(R.utils)
print(setnames(data.table(cbind(2^0:128,intToBin(2^0:128),intToOct(2^0:128),intToHex(2^0:128))),c("Decimal","Binary","Oct","Hex"))[1:100])
Decimal Binary Oct Hex
1: 1 00000001 001 01
2: 2 00000010 002 02
3: 3 00000011 003 03
4: 4 00000100 004 04
5: 5 00000101 005 05
6: 6 00000110 006 06
7: 7 00000111 007 07
8: 8 00001000 010 08
9: 9 00001001 011 09
10: 10 00001010 012 0a
....
t1 <- setnames(data.table(cbind(2^0:128,intToBin(2^0:128),intToOct(2^0:128),intToHex(2^0:128))),c("Decimal","Binary","Oct","Hex")) t1
Decimal Binary Oct Hex
1: 1 00000001 001 01
2: 2 00000010 002 02
3: 3 00000011 003 03
4: 4 00000100 004 04
5: 5 00000101 005 05
---
124: 124 01111100 174 7c
125: 125 01111101 175 7d
126: 126 01111110 176 7e
127: 127 01111111 177 7f
128: 128 10000000 200 80
sapply(t1,class)
Decimal Binary Oct Hex
"character" "character" "character" "character"
