This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A202708 #25 Nov 22 2023 15:07:30 %S A202708 1,1,1,3,3,4,3,3,5,5,7,7,6,5,6,7,8,11,9,8,9,12,10,14,13,15,12,16,16, %T A202708 16,19,17,12,21,21,16,21,20,24,23,24,25,26,25,24,22,31,31,29,31,37,30, %U A202708 32,36,32,35,34,37,36,39,39,41,38,39,51,47,48,35,42,48 %N A202708 Sum of digits of n! divided by 9. %C A202708 (sum of digits of n!) / 9 is an integer for n > 5. %H A202708 Seiichi Manyama, <a href="/A202708/b202708.txt">Table of n, a(n) for n = 6..10000</a> %F A202708 a(n) = A004152(n)/9. %t A202708 Table[Sum[DigitCount[n!][[i]]*i/9, {i, 1, 9}], {n, 6, 100}] %t A202708 Total[IntegerDigits[#]]/9&/@(Range[6,80]!) (* _Harvey P. Dale_, Nov 22 2023 *) %o A202708 (PARI) a(n) = sumdigits(n!)/9; \\ _Michel Marcus_, Aug 12 2022 %Y A202708 Cf. A004152, A086358. %K A202708 nonn,base,easy %O A202708 6,4 %A A202708 _Michel Lagneau_, Dec 23 2011