OFFSET
1,3
LINKS
Seiichi Manyama, Table of n, a(n) for n = 1..450
MATHEMATICA
f[n_] := Sum[k!MoebiusMu[k], {k, n}]; Table[ f[n], {n, 20}] (* Robert G. Wilson v, Nov 12 2004 *)
PROG
(PARI) a(n) = sum(k=1, n, moebius(k)*k!); \\ Seiichi Manyama, May 19 2021
CROSSREFS
KEYWORD
sign
AUTHOR
Leroy Quet, Nov 09 2004
EXTENSIONS
More terms from Robert G. Wilson v, Nov 12 2004
STATUS
approved