OFFSET
0,2
LINKS
Amiram Eldar, Table of n, a(n) for n = 0..1122 (terms 0..150 from Andrew Howroyd)
FORMULA
MAPLE
with(numtheory): seq(`if`(n=0, 1, phi(4^n-1)/n), n=0..27);
MATHEMATICA
Join[{1}, Array[EulerPhi[4^# - 1]/# &, 30]] (* Paolo Xausa, Jun 17 2024 *)
PROG
(PARI) a(n) = if(n==0, 1, eulerphi(4^n-1)/n) \\ Andrew Howroyd, Feb 01 2024
CROSSREFS
KEYWORD
nonn,changed
AUTHOR
EXTENSIONS
a(24) onwards from Andrew Howroyd, Feb 01 2024
STATUS
approved