A204801 - OEIS

%I #7 Oct 03 2014 15:39:58

%S 1468277,2597981,3064751,3240983,3453833,4958021,5982413,6376193,

%T 6877109,8793881,9876161,10133159,10486607,10823039,10857521,11094983,

%U 11883491,12202529,12324497,12382907,12667667,13262957,13599893,13975133

%N Primes followed by a gap of 110.

%H <a href="/index/Pri#gaps">Index entries for primes, gaps between</a>.

%t Transpose[Select[Partition[Prime[Range[10^6]],2,1],#[[2]]-#[[1]]== 110&]] [[1]] (* _Harvey P. Dale_, Oct 03 2014 *)

%o (PARI) p=0; g=110; for(c=1, 100, while(g+p!=p=nextprime(p+1), ); print1(", "p-g))

%K nonn

%O 1,1

%A _M. F. Hasler_, Jan 19 2012