A121564 Denominator of Sum_{i=1..n} i!/(i^i).
1, 1, 2, 18, 288, 180000, 1620000, 190591380000, 780662292480000, 46097327708651520000, 28810829817907200000000, 747278726094210559615027200000000, 747278726094210559615027200000000, 17410163370762081276553474535120146483200000000
Offset: 0
Examples
A121563/A121564 = 0, 1, 3/2, 31/18, 523/288, 333787/180000, ... .
Programs
-
Mathematica
Denominator[Table[Sum[i!/(i^i),{i,n}],{n,12}]] (* James C. McMahon, Oct 19 2024 *)