|
%I #6 Jan 21 2019 19:01:55
%S 3,39,897,38571,2044263,149231199,12386189517,1275777520251,
%T 144162859788363,23498546145503169,4065248483172048237,
%U 784592957252205309741,174964229467241784072243,40766665465867335688832619,10721633017523109286162978797
%N Product of first n primes that end in 3.
%H Harvey P. Dale, <a href="/A092610/b092610.txt">Table of n, a(n) for n = 1..289</a>
%e a(1)= 3 = 3
%e a(2)= 3*13 = 39
%e a(3)= 3*13*23 = 897
%e a(4)= 3*13*23*43 = 38571
%t Rest[FoldList[Times,1,Select[Prime[Range[100]],Mod[#,10]==3&]]] (* _Harvey P. Dale_, Jul 12 2012 *)
%K nonn
%O 1,1
%A _Jorge Coveiro_, Apr 11 2004
%E Corrected and extended by _Harvey P. Dale_, Jul 12 2012
|
