OFFSET
1,2
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..352 (terms 1..81 from Harry J. Smith)
FORMULA
MATHEMATICA
EulerPhi[((10^Range[20] - 1)/9)^2] (* Paolo Xausa, Nov 19 2024 *)
PROG
(PARI) j=[]; for(n=0, 25, j=concat(j, eulerphi( ((10^(n+1)-1)/9)^2) )); j
(PARI) { for (n=0, 80, a=eulerphi(((10^(n + 1) - 1)/9)^2); write("b063751.txt", n, " ", a) ) } \\ Harry J. Smith, Aug 29 2009
CROSSREFS
KEYWORD
nonn,changed
AUTHOR
Jason Earls, Aug 11 2001
EXTENSIONS
Offset corrected by Amiram Eldar, Nov 19 2024
STATUS
approved