Jason Cawley
Wolfram Science Group
Phoenix, AZ USA
Registered: Aug 2003
Posts: 712 |
You are correct, it is just incompleteness in the table in the book, presumably from a sloppy code line generating the table.
Here is the right way to generate it in Mathematica -
rules[x_] := With[{digits = IntegerDigits[x, 2, 8]}, {x, FromDigits[digits /. {0 -> 1, 1 -> 0}, 2], FromDigits[Reverse[digits], 2], FromDigits[Reverse[digits /. {0 -> 1, 1 -> 0}], 2]}]
TableForm[Partition[rules /@ (Range[256] - 1), 8], TableDepth -> 2]
Thanks for catching that...
Report this post to a moderator | IP: Logged
|