OFFSET
1,4
LINKS
MATHEMATICA
a[n_] := Total@ CatalanNumber[FactorInteger[n][[;; , 2]]]; a[1] = 0; Array[a, 100] (* Amiram Eldar, May 15 2023 *)
PROG
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Aug 29 2018
STATUS
approved