close
login
A195504
Product of numbers up to n-1 used as divisors in A008336(n), n >= 2; a(1) = 1.
2
1, 1, 1, 1, 1, 1, 6, 6, 6, 6, 60, 60, 720, 720, 10080, 10080, 10080, 10080, 181440, 181440, 3628800, 3628800, 79833600, 79833600, 79833600, 79833600, 2075673600, 2075673600, 58118860800, 58118860800, 1743565824000, 1743565824000, 1743565824000, 1743565824000
OFFSET
1,7
COMMENTS
This sequence provides more insight into the asymptotic behavior of log(A008336(n)). - Daniel Forgues, Sep 21 2011
LINKS
FORMULA
Sqrt((n-1)! / A008336(n)), n >= 1.
MAPLE
A008336 := proc(n) option remember; if(n=1)then 1: elif(procname(n-1) mod (n-1)=0)then procname(n-1)/(n-1): else procname(n-1)*(n-1): fi: end: A195504 := proc(n) option remember: if(n=1)then 1: elif(A008336(n)<A008336(n-1))then (n-1)*procname(n-1): else procname(n-1): fi: end: seq(A195504(n), n=1..40); # Nathaniel Johnston, Sep 29 2011
CROSSREFS
Sequence in context: A116571 A054641 A024731 * A098537 A276861 A131703
KEYWORD
nonn,easy
AUTHOR
Daniel Forgues, Sep 19 2011
STATUS
approved