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 A216654 #9 Mar 19 2015 20:58:29 %S A216654 2,0,0,1,1,0,2,1,1,2,3,3,4,6,6,8,11,13,16,20,26,33,41,52,65,82,103, %T A216654 129,164,205,259,326,411,516,651,819,1030,1298,1634,2056,2590,3259, %U A216654 4104,5166,6504,8188,10308,12977,16337,20567,25893,32597,41037,51662,65039 %N A216654 Number of n-digit 10th powers. %H A216654 Alois P. Heinz, <a href="/A216654/b216654.txt">Table of n, a(n) for n = 1..1000</a> %e A216654 a(1) = 2: 0, 1. %e A216654 a(4) = 1: 1024. %e A216654 a(5) = 1: 59049. %e A216654 a(7) = 2: 1048576, 9765625. %e A216654 a(10) = 2: 1073741824, 3486784401. %e A216654 a(11) = 3: 10000000000, 25937424601, 61917364224. %p A216654 r:= proc(n, k) local b; b:= iroot(n, k); b+`if`(b^k<n, 1, 0) end: %p A216654 a:= n-> r(10^n, 10) -r(10^(n-1), 10) +`if`(n=1, 1, 0): %p A216654 seq(a(n), n=1..60); %Y A216654 Column k=10 of A216653. %K A216654 nonn,base %O A216654 1,1 %A A216654 _Alois P. Heinz_, Sep 12 2012