A093480 Numbers k such that k^3 - (k-1)^2 is prime.

2, 3, 5, 6, 7, 8, 10, 11, 12, 13, 17, 20, 21, 33, 35, 38, 43, 45, 46, 50, 52, 53, 57, 61, 63, 71, 73, 75, 76, 78, 80, 82, 90, 91, 96, 97, 98, 101, 102, 105, 106, 112, 115, 116, 122, 127, 132, 137, 146, 152, 155, 157, 162, 172, 175, 176, 181, 183, 192, 200, 201, 203

Offset

1,1

Links

Table of n, a(n) for n=1..62.

Mathematica

Select[Range[250], PrimeQ[#^3-(#-1)^2]&]  (* Harvey P. Dale, Mar 21 2011 *)

Prog

(PARI) is(n)=isprime(n^3-(n-1)^2) \\ Charles R Greathouse IV, Jun 13 2017

Crossrefs

Sequence in context: A345475 A191894 A284955 * A121518 A287770 A039080

Adjacent sequences: A093477 A093478 A093479 * A093481 A093482 A093483

Keyword

easy,nonn,changed

Author

Jason Earls, May 22 2004

Status

approved