A100902 Numbers n such that (6^n+1)^2-2 is prime.
0, 1, 2, 3, 4, 9, 12, 30, 49, 56, 115, 118, 376, 432, 1045, 1310, 6529, 7768, 8430, 21942, 26930, 33568
Offset: 1
Links
- S. Harvey, Carol and Kynea Primes.
Programs
-
Magma
[n: n in [0..300] | IsPrime((6^n+1)^2-2)]; // Vincenzo Librandi, Nov 03 2014
-
Maple
A100902:=n->`if`(isprime((6^n+1)^2-2),n,NULL): seq(A100902(n), n=0..1000); # Wesley Ivan Hurt, Nov 02 2014
-
Mathematica
Select[Range[0, 2000], PrimeQ[(6^# + 1)^2 - 2] &] (* Vincenzo Librandi, Nov 03 2014 *)
-
PARI
is(n)=ispseudoprime((6^n+1)^2-2) \\ Charles R Greathouse IV, Feb 19 2016
Extensions
Added 0 from Vincenzo Librandi, Nov 03 2014