login
A175943
Partial products of A027746.
4
1, 2, 6, 12, 24, 120, 240, 720, 5040, 10080, 20160, 40320, 120960, 362880, 725760, 3628800, 39916800, 79833600, 159667200, 479001600, 6227020800, 12454041600, 87178291200, 261534873600, 1307674368000, 2615348736000, 5230697472000
OFFSET
1,2
COMMENTS
a(n) <= A265125(n), a(n) < A265125(n) for n > 10. - Reinhard Zumkeller, Dec 02 2015
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..1000
FORMULA
a(n) is approximately (n / (e log log n))^(n/log log n). - Charles R Greathouse IV, Sep 12 2012
PROG
(PARI) print1(t=1); for(n=2, 10, f=factor(n); for(i=1, #f[, 1], for(j=1, f[i, 2], print1(", "t*=f[i, 1])))) \\ Charles R Greathouse IV, Sep 12 2012
(Haskell)
a175943 n = a175943_list !! (n-1)
a175943_list = scanl1 (*) $ concat a027746_tabf
-- Reinhard Zumkeller, Dec 02 2015
CROSSREFS
n! (A000142) is a subsequence.
Cf. A027746.
Cf. A265125.
Sequence in context: A302652 A180071 A034882 * A228816 A294565 A210068
KEYWORD
nonn
AUTHOR
Lior Manor, Oct 27 2010
STATUS
approved