OFFSET
1,1
EXAMPLE
The 6th term is 3 because the digital sum of 12 (the 6th composite number) is 3 (1+2).
MATHEMATICA
Total /@ IntegerDigits /@ Select[Range[104], CompositeQ] (* Giovanni Resta, May 28 2019 *)
PROG
(PARI) lista(nn) = forcomposite(n=1, nn, print1(sumdigits(n), ", ")); \\ Michel Marcus, May 28 2019
CROSSREFS
KEYWORD
nonn,easy,base
AUTHOR
Kei Ryan, May 27 2019
STATUS
approved