OFFSET
1,3
LINKS
S. Harvey, Carol and Kynea Primes
M. Rodenkirch, Carol and Kynea Prime Search
Eric Weisstein's World of Mathematics, Integer Sequence Primes
Eric Weisstein's World of Mathematics, Near-Square Prime
FORMULA
A093069(n) = (2^a(n) + 1)^2 - 2.
MATHEMATICA
Flatten[Position[Table[(2^n + 1)^2 - 2, {n, 0, 10^3}], _?PrimeQ] - 1] (* Eric W. Weisstein, Feb 10 2016 *)
Select[Range[0, 5000], PrimeQ[(2^# + 1)^2 - 2] & ] (* Vincenzo Librandi, Feb 19 2016 *)
PROG
(Magma) [n: n in [0..500] | IsPrime((2^n+1)^2-2)]; // Vincenzo Librandi, Feb 19 2016
(PARI) is(n)=ispseudoprime((2^n+1)^2-2) \\ Charles R Greathouse IV, Feb 19 2016
CROSSREFS
KEYWORD
nonn,hard
AUTHOR
Eric W. Weisstein, Jan 17 2004
EXTENSIONS
a(41) from Eric W. Weisstein, Feb 27 2004
a(42) to a(44) from Eric W. Weisstein, Jun 05 2004
Edited by Ray Chandler, Nov 15 2004
a(46) from Cletus Emmanuel (cemmanu(AT)yahoo.com), Oct 07 2005
a(47)-a(48) from Eric W. Weisstein, Feb 10 2016 (computed by Mark Rodenkirch)
a(49)-a(50) from Eric W. Weisstein, Jun 08 2016 (computed by Mark Rodenkirch)
a(51) from Eric W. Weisstein, Jun 19 2016 (computed by Mark Rodenkirch)
STATUS
approved