A136349 Numbers k of the form Product_{j=1..m} prime(j) such that k-1 is prime.
6, 30, 2310, 30030, 304250263527210, 23768741896345550770650537601358310
Offset: 1
Keywords
Examples
a(3)=30 where the prime factors are 2,3,5; since N-1=29, prime, N=30 is added to the sequence.
Programs
-
Mathematica
Select[FoldList[Times,1,Prime[Range[70]]],PrimeQ[#-1]&] (* Harvey P. Dale, Jan 09 2011 *)
-
PARI
c=0;t=1;vector(7,n,until( ispseudoprime( -1+t*=prime(c++)),);t)
Formula
Extensions
Edited by M. F. Hasler, May 02 2008, May 30 2008
Comments