A165503 Primes p with a digits sum of p^2 equal to 37.

433, 613, 683, 773, 827, 863, 1063, 1117, 1187, 1223, 1567, 1583, 1657, 1693, 1783, 1907, 1997, 2017, 2087, 2141, 2143, 2161, 2267, 2357, 2393, 2467, 2557, 2593, 2609, 2663, 2719, 2753, 2789, 2843, 2879, 2897, 2969, 2971, 3023, 3041, 3061, 3167, 3187

Offset: 1

Author

Vincenzo Librandi, Sep 21 2009

Keywords

• nonn
• base

Examples

			433 is in the sequence because 433^2=187489 and 1+8+7+4+8+9=37.
1783 is in the sequence because 1783^2=3179089 and 3+1+7+9+0+8+9=37.
		

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. primes p where the digital sum of p^2 is equal to: A226803 (7), A165492 (13), A165493 (19), A165502 (31), this sequence (37), A165504 (43).

Programs

Magma

[p: p in PrimesUpTo(6150) | &+Intseq(p^2) eq 37]; // Vincenzo Librandi, Sep 12 2013

Mathematica

Select[Prime[Range[500]], Total[IntegerDigits[#^2]]== 37&] (* Vincenzo Librandi, Sep 12 2013 *)

Formula

{A000040(i) : A123157(i) = 37} [R. J. Mathar, Sep 29 2009]

Extensions

More terms from R. J. Mathar, Sep 29 2009