OFFSET
1,1
FORMULA
A prime p is in the sequence iff it is the only prime in range (100*Floor(p/100),100*Ceiling(p/100)).
MATHEMATICA
Prime[Last[#]]&/@Select[Partition[PrimePi[100Range[30000]], 2, 1], Last[#]- First[#]==1&] (* Harvey P. Dale, Nov 06 2011 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Ki Punches, Feb 15 2009
EXTENSIONS
Edited and extended by Ray Chandler, Feb 20 2009
Definition corrected by Ki Punches, Feb 24 2009
STATUS
approved