A247980 - OEIS

A247980

Least prime whose square contributes to A234429.

2, 3, 5, 7, 13, 17, 19, 43, 67, 83, 163, 167, 313, 433, 883, 887, 1667, 5167, 5477, 6833, 8167, 17317, 22133, 59833, 70583, 89417, 141067, 160583, 191833, 298327, 882433, 1728583, 2447437, 3143087, 3143167, 4468333, 12957083, 13747687, 26457133

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

COMMENTS

Listed lexicographically and not in the order defined by A234429. See examples.

LINKS

Robert G. Wilson v, Table of n, a(n) for n = 1..54

EXAMPLE

2^2 = 4 = A234429(1),

3^2 = 9 = A234429(3),

5^2 = 25 -> 7 = A234429(2),

7^2 = 49 -> 13 = A234429(5),

19^2 = 361 -> 10 = A234429(4), etc.

MATHEMATICA

p = 2; lst = lsu = {}; While[p < 15250000001, ds = Total@ IntegerDigits[p^2]; If[ !MemberQ[lst, ds], AppendTo[lst, ds]; AppendTo[lsu, p]; Print[ p]]; p = NextPrime@ p]; lsu

CROSSREFS

Cf. A234429.

Sequence in context: A337119 A090422 A005109 * A234851 A179336 A080608

Adjacent sequences: A247977 A247978 A247979 * A247981 A247982 A247983

KEYWORD

nonn

AUTHOR

Robert G. Wilson v, Sep 28 2014

STATUS

approved