OFFSET
1,1
LINKS
M. F. Hasler, Table of n, a(n) for n = 1..433 (all a(n) < 10^8).
MATHEMATICA
Transpose[Select[Partition[Prime[Range[1100000]], 2, 1], Last[#]-First[#] == 120&]] [[1]] (* Harvey P. Dale, Jul 11 2014 *)
PROG
(PARI) g=120; c=o=0; forprime(p=1, default(primelimit), (-o+o=p)==g&write("c:/temp/b204672.txt", c++" "p-g))
(MATLAB)
N = 2*10^7; % to get all terms <= N
P = primes(N+120);
J = find(P(2:end) - P(1:end-1) == 120);
P(J) % Robert Israel, Feb 28 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
M. F. Hasler, Jan 18 2012
STATUS
approved