|
%I #6 Dec 21 2013 03:45:52
%S 0,2,6,30,210,2310,30030,510510,9699690,223092870,6469693230,
%T 200560490130,2153462358810,72490129383210,1958274892758030,
%U 58665460642891410,50035643372444730,19221664375883039070,1123712842678138983270,27456249893723439879090,350421246400567367415390
%N Primorial(n) mod compositorial(n), that is, A002110(n) mod A036691(n).
%C The sequence of numbers k such that a(k) > a(k+1) begins: 15, 42, 645, 805, 1566, 5430, 53698, ...
%F a(n) = A002110(n) mod A036691(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);prod(i=1,N,prime(i))%p \\ _Ralf Stephan_, Dec 21 2013
%Y Cf. A002110, A036691, A233437, A233448.
%K nonn
%O 0,2
%A _Alex Ratushnyak_, Dec 09 2013
|
