OFFSET
1,2
MATHEMATICA
a[n_] := Sum[StirlingS2[n, k] GCD[n, k], {k, 1, n}]; Table[a[n], {n, 1, 25}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Nov 26 2019
STATUS
approved