OFFSET
1,2
COMMENTS
Sequence closely parallel to A000295.
EXAMPLE
MATHEMATICA
a[n_] := BitXor @@ NextPrime[2^n, {-1, 1}]; a[1] = 1; Array[a, 33] (* Amiram Eldar, Aug 08 2024 *)
PROG
(PARI) a(n)= if(n==1, 1, bitxor(precprime(2^n), nextprime(2^n) ))
CROSSREFS
KEYWORD
nonn
AUTHOR
Bill McEachen, Aug 06 2024
EXTENSIONS
More terms from Amiram Eldar, Aug 06 2024
STATUS
approved