|
| |
|
|
A070228
|
|
Number of perfect squares and higher powers not exceeding 2^n.
|
|
1
| |
|
|
1, 1, 2, 3, 5, 8, 11, 16, 23, 31, 42, 58, 82, 114, 156, 217, 299, 417, 583, 814, 1136, 1589, 2224, 3116, 4369, 6136, 8623, 12128, 17064, 24023, 33839, 47689, 67227, 94805, 133738, 188710, 266351, 376019, 530941
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,3
|
|
|
EXAMPLE
| How many powers are there not exceeding 2^4?: 1 4 8 9 16 =(5). a(22)=2224: there are 2224 powers not exceeding 2^22.
|
|
|
PROG
| Pari: for(x=0, 62, print(x, " ", sum(1, n=2, x, -mu(n)*floor(2^(x/n)-1)) ) )
|
|
|
CROSSREFS
| Sequence in context: A101018 A006336 A175831 * A173599 A006304 A039847
Adjacent sequences: A070225 A070226 A070227 * A070229 A070230 A070231
|
|
|
KEYWORD
| nonn,easy
|
|
|
AUTHOR
| Donald S McDonald (don.mcdonald(AT)paradise.net.nz), May 14 2002
|
| |
|
|
