A135555 Prime sums of digits of the terms in A135554.

7, 13, 13, 7, 19, 19, 7, 31, 37, 31, 19, 13, 31, 37, 37, 43, 31, 13, 37, 43, 31, 37, 37, 13, 31, 7, 37, 31, 19, 31, 43, 31, 43, 37, 31, 43, 31, 37, 31, 43, 37, 19, 43, 43, 31, 31, 37, 43, 19, 37, 43, 43, 37, 31, 37, 37, 7, 37, 43, 43, 37, 37, 43, 43, 43, 31, 37

Offset: 1

Author

Enoch Haga, Nov 25 2007

Keywords

• easy
• nonn
• base

Crossrefs

Cf. A007953, A135554.

Programs

Mathematica

Select[DigitSum[Range[300]^4], PrimeQ] (* Amiram Eldar, Jul 17 2025 *)

Formula

a(n) = A007953(A135554(n)). - Amiram Eldar, Jul 17 2025

Extensions

More terms from Amiram Eldar, Jul 17 2025