A185952 Partial products of A002313, the primes that are 1 or 2 (mod 4).
2, 10, 130, 2210, 64090, 2371330, 97224530, 5152900090, 314326905490, 22945864100770, 2042181904968530, 198091644781947410, 20007256122976688410, 2180790917404459036690, 246429373666703871145970
Offset: 1
Examples
a(10) = 2 * 5 * 13 * 17 * 29 * 37 * 41 * 53 * 61 * 73 = 22945864100770.
Links
- G. C. Greubel, Table of n, a(n) for n = 1..300
Programs
-
Mathematica
Rest@ FoldList[#1*#2 &, 1, Select[ Prime@ Range@ 30, Mod[#, 4] != 3 &]] (* Robert G. Wilson v *)
-
PARI
pp(v)=my(t=1); vector(#v,i,t*=v[i]) pp(select(n->n%4<3, primes(20))) \\ Charles R Greathouse IV, Apr 21 2015
Formula
Extensions
Terms corrected by Robert G. Wilson v, Feb 11 2011
Comments