%I #15 Aug 09 2017 00:31:11
%S 29,37,53,59,67,79,89,137,157,163,173,179,239,257,263,269,277,337,359,
%T 373,379,389,439,449,509,547,563,569,577,593,599,607,613,653,659,683,
%U 733,739,757,947,953,977,983,997,1019,1039,1069,1103,1109
%N Upper prime of a difference of 6 between consecutive primes.
%H Charles R Greathouse IV, <a href="/A031925/b031925.txt">Table of n, a(n) for n = 1..10000</a>
%H <a href="/index/Pri#gaps">Index entries for primes, gaps between</a>
%p for i from 1 to 186 do if ithprime(i+1) = ithprime(i) + 6 then print({ithprime(i+1)}); fi; od; # _Zerinvary Lajos_, Mar 19 2007
%o (PARI) is(n)=nextprime(n-5)==n && isprime(n-6) \\ _Charles R Greathouse IV_, Apr 29 2015
%Y Cf. A031924.
%K nonn
%O 1,1
%A _Jeff Burch_
|