OFFSET
1,1
COMMENTS
This is the four-consecutive-prime minus one equivalent of A103533.
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
EXAMPLE
n: prime(n) * prime(n+1) * prime(n+2) * prime(n+3) - 1
1: 2 * 3 * 5 * 7 - 1 = 209 = 11 * 19
2: 3 * 5 * 7 * 11 - 1 = 1154 = 2 * 577
36: 151 * 157 * 163 * 167 - 1 = 645328246 = 2 * 322664123
47: 211 * 223 * 227 * 229 - 1 = 2445956098 = 2 * 1222978049
201: 1229 * 1231 * 1237 * 1249 - 1 = 2337448622686 = 2 * 1168724311343.
MATHEMATICA
Bigomega[n_]:=Plus@@Last/@FactorInteger[n]; SemiprimeQ[n_]:=Bigomega[n]==2; Select[Table[Prime[n]*Prime[n+1]*Prime[n+2]*Prime[n+3]-1, {n, 1000}], SemiprimeQ] (* Ray Chandler, Mar 29 2005 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Jonathan Vos Post, Mar 29 2005
EXTENSIONS
Extended by Ray Chandler, Mar 29 2005
STATUS
approved