OFFSET
1,5
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
FORMULA
a(n) = 2^A015910(n) mod n.
MATHEMATICA
Table[Mod[2^(Mod[2^n, n]), n], {n, 50}] (* Alonso del Arte, Jan 14 2011 *)
Table[PowerMod[2, PowerMod[2, n, n], n], {n, 80}] (* Harvey P. Dale, Oct 09 2019 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Juri-Stepan Gerasimov, Jan 14 2011
EXTENSIONS
Entries corrected by R. J. Mathar, Jan 14 2011
STATUS
approved