%I A031133
%S A031133 2,3,5,19,47,83,109,199,1123,1321,2161,2477,5591,9551,14087,19603,
%T A031133 19609,31393,31397,38461,58789,155893,360653,370247,396733,1357193,
%U A031133 1561891,4652317,8917463,20831299,38089217,70396343,72546143,102765577
%N A031133 Lower prime of a record difference between it and the second prime after 
               it.
%H A031133 Dmitry Kamenetsky (dkamen(AT)rsise.anu.edu.au), Jul 28 2008, <a href="b031133.txt">
               Table of n, a(n) for n = 1..55</a>
%F A031133 a(n) = A031134(n) - A031132(n). (Robert G. Wilson v)
%t A031133 lst = {}; {p, q, r} = {1, 2, 3}; d = 0; Do[{p, q, r} = {q, r, Prime@n}; 
               If[r - p > d, d = r - p; AppendTo[lst, {p, r}]; Print[{p, r-p, r}]], 
               {n, 8050000}]; First /@ lst (from Robert G. Wilson v (rgwv(at)rgwv.com), 
               May 17 2006)
%Y A031133 Cf. A031131, A031132, A031134, A122412, A122413.
%Y A031133 Sequence in context: A038705 A066754 A118625 this_sequence A028490 A004064 
               A164061
%Y A031133 Adjacent sequences: A031130 A031131 A031132 this_sequence A031134 A031135 
               A031136
%K A031133 nonn
%O A031133 1,1
%A A031133 Jeff Burch (jmburch(AT)osprey.smcm.edu)
%E A031133 Extended (and first term added) by Patrick De Geest (pdg(AT)worldofnumbers.com), 
               10/2000.
%E A031133 Further extended by Jud McCranie (j.mccranie(AT)comcast.net), Jan 03 
               2001