A233447 Floor(compositorial(n) / n!), that is, floor(A036691(n) / A000142(n)).

4, 12, 32, 72, 144, 288, 576, 1080, 1920, 3456, 6283, 10996, 18609, 31901, 53169, 86400, 137223, 213458, 337040, 539264, 847415, 1309642, 1992933, 2989400, 4543888, 6815833, 10097530, 15146295, 22980586, 34470879, 51150337, 76725506, 113925752, 167537870, 244126611

Offset

1,1

Links

Table of n, a(n) for n=1..35.

Formula

a(n) = floor(A036691(n) / A000142(n)).

Prog

(PARI) a(n)=my(c, p, N); N=n; c=4; p=1; while(n>0, if(!isprime(c), p=p*c; n=n-1); c=c+1); floor(p/N!) \\ Ralf Stephan, Dec 21 2013

Crossrefs

Cf. A000142, A036691.

Sequence in context: A335687 A348864 A133212 * A127811 A361099 A138517

Adjacent sequences: A233444 A233445 A233446 * A233448 A233449 A233450

Keyword

nonn

Author

Alex Ratushnyak, Dec 10 2013

Status

approved