The OEIS is supported by the many generous donors to the OEIS Foundation.
%I #2 Mar 30 2012 17:31:17
%S 252420,874650,1413510,2053380,2298240,2456160,4640370,7529340,
%T 8708910,11205390,18734310,22141980,23680650,26407920,30866010,
%U 31340400,38515050,43242780,44584260,58430400,61172790,62739180,64449210
%N Numbers n such that prime(n) +- n, prime(n) +- 2n and prime(n) +- 3n are all primes.
%t t = {}; p = 2*3*5*7; Do[ If[ PrimeQ[Prime[p*n] - p*3n] && PrimeQ[Prime[p*n] - p*2n] && PrimeQ[Prime[p*n] - p*n] && PrimeQ[Prime[p*n] + p*n] && PrimeQ[Prime[p*n] + p*2n] && PrimeQ[Prime[p*n] + p*3n], AppendTo[t, n]], {n, 2194723}]; p*t
%Y Cf. A064403, A112530.
%K nonn
%O 1,1
%A _Robert G. Wilson v_, Sep 20 2005