login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Cubes whose digits sum to a prime.
3

%I #4 Mar 30 2012 17:26:17

%S 2197,2744,4096,4913,10648,12167,15625,21952,39304,50653,103823,

%T 140608,195112,262144,300763,314432,405224,438976,614125,1191016,

%U 1225043,1643032,2197000,2406104,2685619,2744000,2863288,3112136,4096000

%N Cubes whose digits sum to a prime.

%F a(n) = (A076204(n))^3.

%t A109408=Select[Table[n^3, {n, 200}], PrimeQ[Plus@@IntegerDigits[ # ]]&];

%Y Corresponding primes in A109410.

%Y Cf. A004164, A076204.

%K base,nonn

%O 1,1

%A _Zak Seidov_, Jun 28 2005