OFFSET
0,3
COMMENTS
a(n) = 9 for n >= 6.
LINKS
FORMULA
G.f.: (1 + x^2 + 4*x^3 - 3*x^5 + 6*x^6)/(1 - x). - Stefano Spezia, Jan 26 2023
EXAMPLE
n = 5, 5 != 120, iteration list = {120,3}, a(5) = 3.
MATHEMATICA
sud[x_] := Apply[Plus, DeleteCases[IntegerDigits[x], 0]]; Table[FixedPoint[sud, w!], {w, 1, 87}]
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Labos Elemer, Jul 21 2003
EXTENSIONS
a(0) = 1 prepended by Alois P. Heinz, Dec 05 2018
STATUS
approved