login
A156999
The second primes of two-prime centuries.
1
302053, 370949, 448451, 461717, 480661, 492113, 507289, 542371, 561667, 604189, 619477, 623171, 645257, 648563, 668347, 682819, 710189, 736577, 745477, 753257, 783953, 809629, 815729, 872863, 873877, 922169, 948671, 963581, 979691
OFFSET
1,1
LINKS
MATHEMATICA
NextPrime[#, 2]&/@Select[100*Range[9800], PrimePi[#+100]-PrimePi[#]==2&] (* or *) NextPrime[100#, 2]&/@Flatten[Position[ Partition[PrimePi[ 100*Range[ 9800]], 2, 1], _?(#[[2]]-#[[1]]==2&), 1, Heads->False]] (* Harvey P. Dale, Jan 30 2019 *)
CROSSREFS
Sequence in context: A023686 A250506 A156998 * A111031 A183641 A212230
KEYWORD
nonn
AUTHOR
Ki Punches, Feb 20 2009
EXTENSIONS
List corrected by Ki Punches, Feb 24 2009
STATUS
approved