|
%I #37 Sep 08 2022 08:44:56
%S 2310,15015,85085,323323,1062347,2800733,6678671,14535931,31367009,
%T 58642669,95041567,162490421,259106347,385499687,600662303,907383479,
%U 1249792339,1673450759,2276990377,3024658859,4132280413,5717264681
%N Product of 5 successive primes.
%H John Cerkan, <a href="/A046303/b046303.txt">Table of n, a(n) for n = 1..10000</a> (terms 1..520 from Vincenzo Librandi)
%F a(n) = Product_{j=n..n+4} prime(j). - _Jon E. Schoenfield_, Jan 07 2015
%F a(n) ~ (n log n)^5. - _Charles R Greathouse IV_, Jun 27 2019
%t lst={};Do[p0=Prime[n];p1=Prime[n+1];p2=Prime[n+2];p3=Prime[n+3];p4=Prime[n+4];a=p0*p1*p2*p3*p4;AppendTo[lst,a],{n,5!}];lst (* _Vladimir Joseph Stephan Orlovsky_, Mar 10 2009 *)
%t Times@@@Partition[Prime[Range[200]],5,1] (* _Harvey P. Dale_, Oct 21 2011 *)
%o (Magma) [&*[ NthPrime(n+k): k in [0..4] ]: n in [1..22]]; // _Bruno Berselli_, Feb 25 2011
%o (PARI) first(n)=my(P=primes(n+4)); vector(n,i,prod(j=i,i+4,P[j])) \\ _Charles R Greathouse IV_, Jun 27 2019
%Y A subsequence of A014614.
%Y Cf. A002110, A006094, A046301, A046302, A046324, A046325, A046326, A046327.
%K nonn,easy
%O 1,1
%A _Patrick De Geest_, Jun 15 1998
|
