OFFSET
1,2
LINKS
Harry J. Smith, Table of n, a(n) for n = 1..1000
FORMULA
a(n) = 1 + A046992(n).
MATHEMATICA
a[1] = 1; a[n_] := a[n - 1] + PrimePi[n]; Table[ a[n], {n, 1, 70} ]
Accumulate[PrimePi[Range[60]]]+1 (* Harvey P. Dale, Jun 11 2014 *)
PROG
(PARI) a=1; for (n=1, 100, print1(a+=primepi(n), ", ")) \\ Harry J. Smith, Jul 24 2009
(PARI) first(n)=my(p, s=1); vector(n, k, s+=p+=isprime(k)) \\ Charles R Greathouse IV, Jan 06 2016
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
R. K. Guy, Robert G. Wilson v, May 14 2001
EXTENSIONS
Definition edited by Georg Fischer, Sep 04 2020
STATUS
approved