OFFSET
1,3
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
FORMULA
a(n) = 0 if n = 1 and a(n) = a(A071324(n)) + 1 otherwise.
EXAMPLE
a(3) = 2 since it takes 2 iterations of A071324 to reach from 3 to 1: 3 -> 2 -> 1.
MATHEMATICA
f[n_] := Plus @@ (-(d = Divisors[n])*(-1)^(Range[Length[d], 1, -1])); a[n_] := Length @ FixedPointList[f, n] - 2; Array[a, 100]
CROSSREFS
KEYWORD
nonn
AUTHOR
Amiram Eldar, Mar 13 2020
STATUS
approved