login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A064371 Zero, together with positive numbers n such that the n-th prime + n is a square. 8
0, 5, 12, 86, 105, 176, 214, 230, 241, 412, 503, 696, 1065, 1147, 1170, 1273, 1334, 2021, 2455, 2600, 2660, 2772, 3299, 3332, 3365, 4417, 4861, 6478, 6572, 8115, 8858, 8905, 9229, 9380, 9590, 9692, 9749, 10501, 10829, 11338, 11633, 11690, 12099 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,2
LINKS
MATHEMATICA
Join[{0}, Transpose[Select[Table[{n, Prime[n]}, {n, 15000}], IntegerQ[ Sqrt[ Total[#]]]&]][[1]]] (* Harvey P. Dale, May 26 2011 *)
PROG
(PARI) j=[]; for(n=0, 20000, if(n==0 || issquare(prime(n)+n), j=concat(j, n))); j
(PARI) { n=0; default(primelimit, 20000000); for (m=0, 10^9, if (m==0 || issquare(prime(m) + m), write("b064371.txt", n++, " ", m); if (n==300, break)) ) } \\ Harry J. Smith, Sep 14 2009
(Magma) [0] cat [n: n in [1..12500] | IsSquare(NthPrime(n)+n)]; // Bruno Berselli, May 26 2011
CROSSREFS
Cf. A014688.
Sequence in context: A215866 A219288 A368074 * A249478 A009414 A009426
KEYWORD
easy,nonn
AUTHOR
Jason Earls, Sep 26 2001
EXTENSIONS
Edited by Harry J. Smith, Sep 14 2009
STATUS
approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 3 17:50 EST 2024. Contains 370512 sequences. (Running on oeis4.)