OFFSET
1,1
COMMENTS
A129856 is obtained by removing the composites (9, 15 etc.) from this sequence.
This is sequence A046933, with the zero and all the 1's deleted. - R. J. Mathar, Jan 24 2008
EXAMPLE
a(1)=3 because in the run 8, 9, 10 there are three terms.
MATHEMATICA
Select[#[[2]]-#[[1]]-1&/@Partition[Prime[Range[100]], 2, 1], #>2&] (* Harvey P. Dale, Apr 08 2015 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Enoch Haga, Jan 22 2008
EXTENSIONS
Edited by R. J. Mathar, May 27 2009
STATUS
approved