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 A253647 #8 Sep 07 2018 17:42:55 %S A253647 1,2,3,5,6,14,17,68,76,96,188,483,518,582,736,786,1331,1414,3944,4214, %T A253647 6112,6676,8256,8583,8686,9738,15314,15483,33736,44712,48989,61562, %U A253647 71689,78512,93711,121568,187791,239477,292958,315426,545866,763142,792612,1391739 %N A253647 Numbers n such that n^k is zeroless for k=0,...,6. %C A253647 Contains A124648 as a subsequence. Primes in this sequence are listed in A253646. %C A253647 There are 55 terms below 10^7. Conjectured to be finite. %H A253647 Giovanni Resta, <a href="/A253647/b253647.txt">Table of n, a(n) for n = 1..191</a> (terms < 3.3*10^16) %t A253647 Select[Range[14*10^5],Count[Flatten[IntegerDigits/@(#^Range[ 0,6])],0] == 0&] (* _Harvey P. Dale_, Apr 29 2018 *) %o A253647 (PARI) is_A253647(n,K=6)=!forstep(k=K,1,-1,vecmin(digits(n^k))||return) %Y A253647 Cf. A052382, A104264, A124648, A124649, A253645, A253646. %K A253647 nonn,base %O A253647 1,2 %A A253647 _M. F. Hasler_, Jan 07 2015