A100902 - OEIS

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

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,3

LINKS

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 *)

PROG

(Magma) [n: n in [0..300] | IsPrime((6^n+1)^2-2)]; // Vincenzo Librandi, Nov 03 2014

(PARI) is(n)=ispseudoprime((6^n+1)^2-2) \\ Charles R Greathouse IV, Feb 19 2016

CROSSREFS

KEYWORD

nonn,more

AUTHOR

Ray Chandler, Nov 21 2004

EXTENSIONS

Added 0 from Vincenzo Librandi, Nov 03 2014

STATUS

approved