|
%I #14 Mar 14 2017 11:58:04
%S 127,307,331,787,853,877,967,1423,1597,1861,2053,2371,2437,2647,2767,
%T 2833,2953,3037,3607,3691,3793,3847,3877,4153,4507,4831,4903,4987,
%U 5167,5323,5347,5683,5953,6067,6733,7057,7207,7297,7621,7717
%N Upper prime of a difference of 14 between consecutive primes.
%H Harvey P. Dale, <a href="/A031933/b031933.txt">Table of n, a(n) for n = 0..2000</a>
%H <a href="/index/Pri#gaps">Index entries for primes, gaps between</a>
%t Select[Partition[Prime[Range[1000]],2,1],#[[2]]-#[[1]]==14&][[All,2]] (* _Harvey P. Dale_, Mar 14 2017 *)
%K nonn
%O 0,1
%A _Jeff Burch_
%E Corrected by _Jud McCranie_, Jan 04 2001
|
