1,1

Corresponding n in A076204, n^3 in A109408. A004164 Sum of digits of cubes.

Table of n, a(n) for n=1..69.

A109410(n) = digit_sum(A109408(n)).

Select[Total[IntegerDigits[#]]&/@(Range[1000]^3), PrimeQ] (* Harvey P. Dale, Jul 16 2017 *)

Cf. A004164, A109408, A076204.

Sequence in context: A215085 A241525 A321332 * A230339 A022975 A023461

Adjacent sequences: A109407 A109408 A109409 * A109411 A109412 A109413

base,nonn

Zak Seidov, Jun 28 2005

approved