OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1600
K. Soundararajan, Small gaps between prime numbers: the work of Goldston-Pintz-Yildirim, Bull. Amer. Math. Soc., 44 (2007), 1-18.
MATHEMATICA
Transpose[Select[Partition[Prime[Range[500]], 2, 1], #[[2]]-#[[1]]> 11&]] [[1]] (* Harvey P. Dale, Dec 20 2010 *)
Select[Prime[Range[500]], NextPrime[#] - # >= 12 &]
Prime[#]&/@Flatten[Position[Differences[Prime[Range[400]]], _?(#>11&)]] (* Harvey P. Dale, Jan 27 2020 *)
PROG
(PARI) lista(nn) = forprime(p=2, nn, if (nextprime(p+1) - p >= 12, print1(p, ", "))); \\ Michel Marcus, Sep 05 2016
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Dec 19 2006
STATUS
approved