|
%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
|
