A162292 Primes of the form k^3-k^2+1, k>0.
5, 19, 101, 181, 449, 2029, 2549, 8821, 13249, 16901, 21169, 23549, 34849, 38149, 41651, 45361, 62401, 77659, 89101, 108289, 115249, 122501, 130051, 163351, 191749, 433201, 505601, 564899, 697049, 720901, 795709, 875521, 960499, 990001
Offset: 1
Keywords
Examples
a(1)=2^3-2^2+1=5. a(2)=3^3-3^2+1=19. a(3)=5^3-5^2+1=101.
Links
- Ivan Neretin, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
lst={};Do[s=n^3-n^2;If[PrimeQ[s+1],AppendTo[lst,s+1]],{n,4*5!}];lst
Extensions
Edited by R. J. Mathar, Jul 02 2009