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
Programs
-
Mathematica
Select[DigitSum[Range[300]^4], PrimeQ] (* Amiram Eldar, Jul 17 2025 *)
Formula
Extensions
More terms from Amiram Eldar, Jul 17 2025