OFFSET
1,1
REFERENCES
Posting to NMBRTHRY(AT)LISTSERV.NODAK.EDU by Mike Oakes Dec 30 2000 entitled "Gaussian analogues of the Cullen and Woodall primes."
MATHEMATICA
Do[ If[ PrimeQ[ n^2*2^n - n*2^((n + 1)/2) + 1], Print[n] ], {n, 1, 100000, 2} ]
PROG
(PARI) is(n)=ispseudoprime(n^2*2^n-n*2^((n+1)/2)+1) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Jan 02 2001
STATUS
approved