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 A068159 #6 Mar 24 2025 16:33:19 %S A068159 1,1,1,1,1,1,1,1,1,10,1,0,0,0,0,0,0,0,0,10,1,1,0,0,0,0,0,0,0,10,2,1,1, %T A068159 0,0,0,0,0,0,10,2,1,1,1,0,0,0,0,0,10,3,2,1,1,1,0,0,0,0,10,3,2,1,1,1,1, %U A068159 0,0,0,10,4,2,1,1,1,1,1,0,0,10,4,2,2,1,1,1,1,1,0,10,4,3,2,1,1,1,1,1,1 %N A068159 a(n) = floor[ n/R(n) ], where R(n) (A004086) = Digit reversal of n. %e A068159 a(61) = floor[61 / 16] = 3. %t A068159 Reversal = ToExpression @ StringReverse @ ToString[ # ] &; Table[ Floor[n/Reversal[n]], {n, 1, 100}] %t A068159 Table[Floor[n/IntegerReverse[n]],{n,100}] (* _Harvey P. Dale_, Mar 24 2025 *) %K A068159 base,easy,nonn %O A068159 1,10 %A A068159 _Amarnath Murthy_, Feb 24 2002 %E A068159 Edited by _Robert G. Wilson v_, Mar 02 2002