OFFSET
2,1
MATHEMATICA
Table[Mod[IntegerReverse[8*n], 8], {n, 2, 110}] (* The program uses the IntegerReverse function from Mathematica version 10 *) (* Harvey P. Dale, Jan 14 2016 *)
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Amarnath Murthy and Meenakshi Srikanth (menakan_s(AT)yahoo.com), May 26 2003
EXTENSIONS
More terms from Ray Chandler, May 27 2003
STATUS
approved