[go: up one dir, main page]

login
A084340
8*n digit-reversed mod 8.
6
5, 2, 7, 4, 4, 1, 6, 3, 0, 0, 5, 1, 3, 5, 5, 7, 1, 3, 5, 5, 7, 1, 3, 2, 2, 4, 6, 0, 2, 2, 4, 6, 0, 2, 2, 4, 3, 5, 7, 7, 1, 3, 5, 7, 7, 1, 3, 5, 4, 4, 6, 0, 2, 4, 4, 6, 0, 2, 4, 4, 6, 5, 7, 1, 1, 3, 5, 7, 1, 1, 3, 5, 7, 6, 6, 0, 2, 4, 6, 6, 0, 2, 4, 6, 6, 0, 7, 1, 3, 3, 5, 7, 1, 3, 3, 5, 7, 1, 0, 0, 2, 4, 6, 0, 0
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