|
%I #6 Dec 21 2013 03:54:45
%S 4,12,32,72,144,288,576,1080,1920,3456,6283,10996,18609,31901,53169,
%T 86400,137223,213458,337040,539264,847415,1309642,1992933,2989400,
%U 4543888,6815833,10097530,15146295,22980586,34470879,51150337,76725506,113925752,167537870,244126611
%N Floor(compositorial(n) / n!), that is, floor(A036691(n) / A000142(n)).
%F a(n) = floor(A036691(n) / A000142(n)).
%o (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
%Y Cf. A000142, A036691.
%K nonn
%O 1,1
%A _Alex Ratushnyak_, Dec 10 2013
|
