cp's OEIS Frontend

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.

A115694 Cubes whose digit reversal is a powerful(1) number (A001694).

This page as a plain text file.
%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