A233437 Floor(Primorial(n) / compositorial(n)), that is, floor(A002110(n) / A036691(n)).

1, 2, 4, 8, 18, 39, 85, 191, 425, 940, 2185, 5183, 12814, 32711, 84715, 218141, 555741, 1376723, 3457106, 9544621, 26048861, 72830491, 202468765, 591526393, 1717701641, 4994058475, 14800573301, 44137423952, 133960953399, 413431218250, 1247184175056, 3842131894125

Offset: 12

Author

Alex Ratushnyak, Dec 09 2013

Keywords

• nonn

Crossrefs

Cf. A002110, A036691.

Programs

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(prod(i=1,N,prime(i))/p) \\ Ralf Stephan, Dec 21 2013

Formula

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