This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A277545 #10 Oct 26 2016 15:24:24 %S A277545 1,2,3,4,5,6,1,1,2,3,4,5,6,2,1,2,3,4,5,6,3,1,2,3,4,5,6,4,1,2,3,4,5,6, %T A277545 5,1,2,3,4,5,6,6,1,2,3,4,5,6,1,1,2,3,4,5,6,1,1,2,3,4,5,6,2,1,2,3,4,5, %U A277545 6,3,1,2,3,4,5,6,4,1,2,3,4,5,6,5,1,2 %N A277545 a(n) = n/7^m mod 7, where 7^m is the greatest power of 7 that divides n. %C A277545 a(n) is the rightmost nonzero digit in the base 7 expansion of n. %H A277545 Clark Kimberling, <a href="/A277545/b277545.txt">Table of n, a(n) for n = 1..10000</a> %F A277545 a(n) = A242603(n) mod 7. - _Michel Marcus_, Oct 20 2016 %e A277545 a(9) = (9/7 mod 7) = 2. %t A277545 Table[Mod[n/7^IntegerExponent[n, 7], 7], {n, 1, 160}] %o A277545 (PARI) a(n) = n/7^valuation(n, 7) % 7; \\ _Michel Marcus_, Oct 20 2016 %Y A277545 Cf. A010876, A242603. %K A277545 nonn,easy %O A277545 1,2 %A A277545 _Clark Kimberling_, Oct 19 2016