OFFSET
0,8
LINKS
Andrew Howroyd, Table of n, a(n) for n = 0..150
MATHEMATICA
PrimePi[#[[2]]]-PrimePi[#[[1]]]&/@Partition[PartitionsP[Range[0, 100]], 2, 1] (* Harvey P. Dale, Sep 13 2021 *)
PROG
(PARI) a(n)={primepi(numbpart(n+1)) - primepi(numbpart(n))} \\ Andrew Howroyd, Jan 05 2020
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Sep 11 2003
EXTENSIONS
Terms a(42) and beyond from Andrew Howroyd, Jan 05 2020
STATUS
approved