A233447 - OEIS

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

(list; graph; refs; listen; history; text; internal format)

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