OFFSET
1,1
COMMENTS
Apparently uses a non-standard definition of a Gaussian prime. Let k*(1+i)^k-1 = a+b*i, then k is in this sequence if a+b*i is a Gaussian prime or b=0 and abs(a) is an ordinary prime. - Sean A. Irvine, Aug 13 2022
MATHEMATICA
Do[ If[ PrimeQ[ n * (1 + I)^n - 1], Print[n] ], {n, 1, 5000} ]
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Robert G. Wilson v, Jan 02 2001
STATUS
approved