(MAGMAMagma) [a: n in [0..600] | IsPrime(a) where a is 7*n^2+1];
(MAGMAMagma) [a: n in [0..600] | IsPrime(a) where a is 7*n^2+1];
_Vincenzo Librandi (vincenzo.librandi(AT)tin.it), _, Dec 03 2011
proposed
approved
editing
proposed
allocated for Vincenzo LibrandiPrimes of the form 7n^2 + 1.
29, 113, 449, 701, 1009, 1373, 2269, 2801, 3389, 4733, 6301, 8093, 13553, 14813, 23549, 30493, 32369, 34301, 38333, 40433, 42589, 49393, 56701, 64513, 70001, 78653, 81649, 84701, 100801, 114689, 125693, 137201, 149213, 161729, 166013
1,1
Vincenzo Librandi, <a href="/A201602/b201602.txt">Table of n, a(n) for n = 1..5000</a>
Select[Table[7n^2+1, {n, 0, 900}], PrimeQ]
(MAGMA) [a: n in [0..600] | IsPrime(a) where a is 7*n^2+1];
allocated
nonn,easy
Vincenzo Librandi (vincenzo.librandi(AT)tin.it), Dec 03 2011
approved
editing
allocated for Vincenzo Librandi
allocated
approved