A269221 Factorial of the sum of decimal digits of n.
1, 1, 2, 6, 24, 120, 720, 5040, 40320, 362880, 1, 2, 6, 24, 120, 720, 5040, 40320, 362880, 3628800, 2, 6, 24, 120, 720, 5040, 40320, 362880, 3628800, 39916800, 6, 24, 120, 720, 5040, 40320, 362880, 3628800, 39916800, 479001600, 24, 120, 720, 5040
Offset: 0
Links
- Harvey P. Dale, Table of n, a(n) for n = 0..1000
Programs
-
Mathematica
Table[Total[IntegerDigits[n]]!,{n,0,50}] (* Harvey P. Dale, Dec 19 2021 *) -
PARI
A269221(n)=sumdigits(n)!
Comments