r - Rで生データを16進数ではなく2進数で出力しますか?

Question

例えば：

to.read = file('http://www.ats.ucla.edu/stat/r/faq/bintest.dat', 'rb')
a = readBin(to.read, 'raw', n=8)
print(a)
close(to.read)
# [1] 01 00 00 00 02 00 00 00 03 00 00 00 04 00 00 00

次のように印刷したいと思います。

00000001 00000000 00000010 00000000 ...