login
Numbers n such that 7*n^2 + 1 is prime.
1

%I #15 Sep 08 2024 19:26:21

%S 2,4,8,10,12,14,18,20,22,26,30,34,44,46,58,66,68,70,74,76,78,84,90,96,

%T 100,106,108,110,120,128,134,140,146,152,154,156,158,162,164,168,174,

%U 184,186,188,196,200,202,210,216,228,232,238,250,252,260,262,264,268

%N Numbers n such that 7*n^2 + 1 is prime.

%e If n=2 then 7*n^2 + 1 = 29 (prime).

%e If n=100 then 7*n^2 + 1 = 70001 (prime).

%t Select[Range[300], PrimeQ[7*#^2 + 1] &] (* _Stefan Steinerberger_, Jan 02 2008 *)

%o (Magma) [ n: n in [0..500] | IsPrime(7*n^2 + 1) ]; // _Vincenzo Librandi_, Jan 31 2011

%o (PARI) is(n)=isprime(7*n^2+1) \\ _Charles R Greathouse IV_, Jun 13 2017

%Y Cf. A111051.

%K nonn,easy

%O 1,1

%A _Parthasarathy Nambi_, Nov 05 2007

%E More terms from _Stefan Steinerberger_, Jan 02 2008