A157417 Primes of the form floor((4*n^2-8*n-9)/3).
7, 17, 29, 43, 61, 103, 157, 257, 337, 641, 701, 829, 967, 1117, 1277, 1361, 1447, 1723, 2129, 2237, 2347, 3067, 3329, 3463, 4177, 4327, 4481, 4637, 4957, 5981, 6343, 6529, 6907, 7297, 7901, 8317, 9181, 9403, 9629, 9857, 10321, 11527, 11777, 12541, 13063
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[a: n in [3..100] | IsPrime(a) where a is Floor((4*n^2-8*n-9)/3)]; // Vincenzo Librandi, Mar 21 2013
-
Mathematica
Select[Table[Floor[(4 n^2 - 8 n - 9)/3], {n, 3, 100}], PrimeQ] (* Vincenzo Librandi, Mar 21 2013 *)
Comments