login
5 consecutive primes differ by 2n or more starting at a(n).
0

%I #7 Dec 01 2024 13:22:36

%S 3,73,241,683,7043,10181,23371,63913,66191,112403,231109,250501,

%T 648449,648449,668243,2090951,2090951,2090951,2090951,8791801,8791801,

%U 14784911,14784911,14784911,14784911,31362371,31362371,51885313,51885313

%N 5 consecutive primes differ by 2n or more starting at a(n).

%t With[{prs=Prime[Range[3110000]]},Table[SelectFirst[Partition[prs,5,1],Min[Differences[#]]>=2n&][[1]],{n,30}]] (* _Harvey P. Dale_, Dec 01 2024 *)

%K nonn

%O 1,1

%A _Jeff Burch_, Apr 19 2000

%E Corrected and extended by Larry Reeves (larryr(AT)acm.org), Nov 10 2000

%E a(22)-a(29) from _Donovan Johnson_, Sep 03 2008