|
|
A124670
|
|
(Product of successive primes minus 2) divided by 3 is prime.
|
|
1
|
|
|
11, 47, 73, 107, 587, 673, 3467, 3673, 4783, 7499, 10799, 17327, 29983, 33073, 62207, 71147, 72073, 137387, 225227, 243673, 252283, 355007, 442367, 504299, 554699, 567673, 735073, 874799, 924073, 961067, 1062073, 1175627, 1326673, 1486847
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
11*13 = 143, 143-2 = 141, 141/3 = 47 is the second entry.
|
|
MATHEMATICA
|
Select[(Times@@@Partition[Prime[Range[500]], 2, 1]-2)/3, PrimeQ] (* Harvey P. Dale, Oct 02 2012 *)
|
|
PROG
|
(PARI) g(n) = { for(x=1, n, y=prime(x)*prime(x+1)-2; if(y%3==0, if(isprime(y/3), print1(y/3", ")))) }
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|