login
This site is supported by donations 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

Harry J. Smith, Table of n, a(n) for n = 1..300

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: A235939 A215866 A219288 * A249478 A009414 A009426

Adjacent sequences:  A064368 A064369 A064370 * A064372 A064373 A064374

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 | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 21 01:12 EDT 2019. Contains 328291 sequences. (Running on oeis4.)