A153502 Primes of the form 3*n^2 - 3*n + 11.
11, 17, 29, 47, 71, 101, 137, 179, 227, 281, 479, 557, 641, 827, 929, 1151, 1667, 1811, 2447, 2621, 2801, 3581, 4007, 4229, 4457, 4691, 4931, 6221, 6779, 8597, 9587, 9929, 10631, 12107, 12491, 13679, 14087, 16217, 16661, 19937, 25127, 25679, 26237
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[a: n in [1..100] | IsPrime(a) where a is 3*n^2-3*n+11]; // Vincenzo Librandi, Jul 16 2012
-
Mathematica
Select[Table[3 n^2 - 3 n + 11, {n, 1, 700}], PrimeQ] (* Vincenzo Librandi, Jul 16 2012 *)
-
PARI
lista(nn) = for (n=1, nn, if (isprime(p=3*n^2-3*n+11), print1(p, ", "))) \\ Michel Marcus, Sep 14 2015
Comments