OFFSET
1,1
MATHEMATICA
Module[{nn=5000, zd}, zd=Union[Table[Length[Last[Split[IntegerDigits[n!, 9]]]], {n, nn}]]; Complement[ Range[Max[zd]], zd]] (* Harvey P. Dale, Dec 26 2023 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Carl R. White, Jan 21 2008
STATUS
approved