A165504 Primes p with a digits sum of p^2 equal to 43.

887, 1697, 1723, 1867, 1913, 2083, 2137, 2417, 2543, 2633, 2687, 2767, 2803, 2957, 3083, 3109, 3137, 3433, 3793, 3847, 3947, 4073, 4217, 4423, 4567, 4657, 4783, 4793, 4937, 5099, 5233, 5279, 5333, 5387, 5431, 5647, 5683, 5827, 6043, 6053, 6133, 6143

Offset: 1

Author

Vincenzo Librandi, Sep 21 2009

Keywords

• nonn
• base

Examples

			887 is in the sequence because 887^2=786769 and 7+8+6+7+6+9=43.
1723 is in the sequence because 1723^2=2968729 and 2+9+6+8+7+2+9=43.
		

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), A165503 (37), this sequence (43).

Programs

Magma

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

Mathematica

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

Formula

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

Extensions

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