OFFSET
1,4
COMMENTS
FORMULA
n-1-A046144(n).
PROG
(PARI) for(i=1, 100, p=0; for(q=1, i-1, if(gcd(q, i)>1||znorder(Mod(q, i))!=eulerphi(i), p++)); print1(p", "))
CROSSREFS
KEYWORD
nonn
AUTHOR
V. Raman, Nov 10 2012
STATUS
approved