Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A060967
Number of squared primes <= 2^n.
14
0, 0, 1, 1, 2, 3, 4, 5, 6, 8, 11, 14, 18, 24, 31, 42, 54, 72, 97, 128, 172, 229, 309, 418, 564, 760, 1028, 1393, 1900, 2585, 3512, 4792, 6542, 8952, 12251, 16777, 23000, 31579, 43390, 59631, 82025, 112957, 155611, 214516, 295947, 408493, 564163, 779638
OFFSET
0,5
LINKS
Ray Chandler, Table of n, a(n) for n = 0..125 (terms 0..63 from Harry J. Smith, terms 64..112 from Hiroaki Yamanouchi)
FORMULA
a(2*n) = A007053(n). - Amiram Eldar, Jul 10 2024
EXAMPLE
For n = 8, the squared primes not exceeding 256 are 4, 9, 25, 49, 121, 169 so a(8) = 6.
MATHEMATICA
Table[ PrimePi[ Floor[ 2^(g/2)//N ] ], {g, 1, 75} ]
PROG
(PARI) { f="b060967.txt"; default(primelimit, 4294965247); a=n=-1; s=1; forprime (p=2, 4294965247, a++; if (p^2>s, write(f, n++, " ", a); s*=2); if (p^2>s, write(f, n++, " ", a); s*=2); ) } \\ Harry J. Smith, Jul 15 2009
CROSSREFS
Sequence in context: A253773 A124067 A308806 * A218930 A350391 A026483
KEYWORD
nonn
AUTHOR
Labos Elemer, May 09 2001
EXTENSIONS
a(0) prepended by Harry J. Smith, Jul 15 2009
STATUS
approved