A030977 a(n) = floor(exp(1/3)*n!).
1, 2, 8, 33, 167, 1004, 7033, 56271, 506439, 5064398, 55708382, 668500584, 8690507599, 121667106396, 1825006595947, 29200105535158, 496401794097692, 8935232293758467, 169769413581410888, 3395388271628217765
Offset: 1
Links
- Jinyuan Wang, Table of n, a(n) for n = 1..449
Programs
-
Mathematica
Floor[Exp[1/3]Range[20]!] (* Harvey P. Dale, Sep 23 2021 *)