login
A109410
Prime numbers p such that p = digit sum of cubes in A109408.
3
19, 17, 19, 17, 19, 17, 19, 19, 19, 19, 17, 19, 19, 19, 19, 17, 17, 37, 19, 19, 17, 19, 19, 17, 37, 17, 37, 17, 19, 37, 37, 17, 37, 37, 37, 37, 37, 37, 37, 19, 17, 19, 37, 37, 17, 37, 37, 37, 19, 37, 37, 37, 37, 19, 37, 37, 37, 37, 37, 37, 37, 17, 37, 37, 37, 37, 37, 37, 37
OFFSET
1,1
COMMENTS
Corresponding n in A076204, n^3 in A109408. A004164 Sum of digits of cubes.
FORMULA
A109410(n) = digit_sum(A109408(n)).
MATHEMATICA
Select[Total[IntegerDigits[#]]&/@(Range[1000]^3), PrimeQ] (* Harvey P. Dale, Jul 16 2017 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Zak Seidov, Jun 28 2005
STATUS
approved