OFFSET
1,36
FORMULA
a(1) = 1; a(n) = Sum_{d|n, n/d > 5} a(d).
EXAMPLE
a(42) = 3: 42 = 6*7 = 7*6.
MATHEMATICA
a[n_] := a[n] = If[n == 1, n, Sum[If[n/d > 5, a[d], 0], {d, Divisors[n]}]]; Table[a[n], {n, 1, 96}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Mar 15 2024
STATUS
approved