OFFSET
1,3
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..2000
MATHEMATICA
m = 1500; v = PrimePi[#[[2]]] - PrimePi[#[[1]]] & /@ Partition[Accumulate[Range[0, m + 1]], 2, 1]; seq = {}; vm = -1; Do[If[v[[k + 1]] > vm, vm = v[[k + 1]]; AppendTo[seq, k]], {k, 0, m}]; seq (* Amiram Eldar, Dec 14 2019 after Harvey P. Dale at A066888 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Jason Earls, Jun 08 2003
EXTENSIONS
Data corrected by Amiram Eldar, Dec 14 2019
STATUS
approved