OFFSET
2,1
FORMULA
a(n) = A055729(prime(n)). - R. J. Mathar, Sep 15 2012
EXAMPLE
There are 4 primes < 3^2
MATHEMATICA
Table[PrimePi[3^Prime[n]], {n, 9}] (* Michael De Vlieger, Mar 20 2015 *)
PROG
(PARI) primesless3p(n) = /* primes less than 3^p */ { forprime(x=2, n, y=primepi(3^x); print1(y", "); ); print()}
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Cino Hilliard, Jul 28 2003
EXTENSIONS
a(10)-a(16) added by David Baugh, Mar 17 2015
STATUS
approved