|
|
A101226
|
|
Numbers formed by the fourth nesting of pi(10^n).
|
|
1
|
|
|
0, 2, 5, 14, 44, 165, 725, 3607, 19624, 115127, 716177, 4675144, 31743253
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
FORMULA
|
a(n) = pi(pi(pi(pi(10^n)))) where pi(x) is the number of primes LE x.
|
|
EXAMPLE
|
a(3) = pi(pi(pi(pi(10^3)))) = 5, the third entry in the table.
|
|
MATHEMATICA
|
f[n_] := Nest[PrimePi, 10^n, 4]; Table[ f[n], {n, 13}] (* Robert G. Wilson v, Dec 21 2004 *)
|
|
PROG
|
(PARI) nestpi(n, m) = { local(x, y, z); for(x=1, n, z=10^x; for(y=1, m, z=pi(z)); print1(z", ")) } pi(n) = \pi(n) Prime count function { local(c, x); c=0; forprime(x=1, n, c++); return(c) }
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|