OFFSET
0,3
MATHEMATICA
a[n_] := a[n] = Sum[GCD[n, k] a[n - k], {k, 1, n}]; a[0] = 1; Table[a[n], {n, 0, 31}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, May 27 2019
STATUS
approved