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