login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A247980 Least prime whose square contributes to A234429. 1
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: A138539 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

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified November 18 07:22 EST 2019. Contains 329252 sequences. (Running on oeis4.)