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 A115694 #12 Feb 24 2024 06:45:55 %S A115694 1,8,27,343,1000,1331,8000,27000,343000,1000000,1030301,1331000, %T A115694 1367631,8000000,27000000,343000000,1000000000,1003003001,1030301000, %U A115694 1033364331,1331000000,1334633301,1367631000,8000000000,10662526601,27000000000,343000000000,1000000000000 %N A115694 Cubes whose digit reversal is a powerful(1) number (A001694). %H A115694 Amiram Eldar, <a href="/A115694/b115694.txt">Table of n, a(n) for n = 1..265</a> %H A115694 <a href="/index/Pow#powerful">Index entries for sequences related to powerful numbers</a>. %e A115694 27 = 3^3 and 72 = 2^3*3^2 is powerful. %t A115694 Select[Range[2300]^3,Min[FactorInteger[IntegerReverse[#]][[All,2]]]>1 || IntegerReverse[#]==1&] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Jun 08 2021 *) %o A115694 (PARI) lista(kmax) = {my(c); for(k = 1, kmax, c = k^3; if(ispowerful(fromdigits( Vecrev(digits(c)))), print1(c, ", ")));} \\ _Amiram Eldar_, Feb 24 2024 %Y A115694 Cf. A001694, A115693. %K A115694 nonn,base %O A115694 1,2 %A A115694 _Giovanni Resta_, Jan 31 2006 %E A115694 a(26)-a(28) from _Amiram Eldar_, Feb 24 2024