A084339 7*n digit-reversed mod 7.
6, 5, 5, 4, 3, 3, 2, 1, 0, 0, 6, 5, 5, 4, 1, 1, 5, 2, 6, 6, 3, 0, 0, 4, 1, 1, 5, 1, 5, 5, 2, 6, 6, 3, 0, 0, 4, 1, 5, 5, 2, 5, 5, 2, 6, 6, 3, 0, 4, 4, 1, 5, 5, 2, 6, 6, 2, 6, 3, 3, 0, 4, 4, 1, 5, 5, 2, 6, 3, 3, 6, 3, 3, 0, 4, 4, 1, 5, 2, 2, 6, 3, 3, 0, 3, 3, 0, 4, 1, 1, 5, 2, 2, 6, 3, 3, 0, 4, 0, 0, 4, 1, 1, 5, 2
Offset: 2
Programs
-
Mathematica
Table[Mod[IntegerReverse[7n],7],{n,2,110}] (* Harvey P. Dale, Aug 29 2023 *)
Extensions
More terms from Ray Chandler, May 27 2003
Comments