OFFSET
0,1
COMMENTS
The 0, 1, 2, 3, 5 and 7 terms of this sequence are primes. Are there any more?
MATHEMATICA
Table[FromDigits[Sort[IntegerDigits[2^2^n+1]]/.(0->Nothing)], {n, 0, 10}] (* Harvey P. Dale, Apr 11 2021 *)
CROSSREFS
KEYWORD
base,nonn,nice
AUTHOR
Jason Earls, Dec 20 2002
STATUS
approved