|
Search: id:A101836
|
|
| |
|
| 0, 1, 2, 5, 12, 25, 50, 99, 198, 400, 803, 1605, 3210, 6422, 12848, 25692, 51384, 102784, 205563, 411115, 822234, 1644470, 3288958, 6577915, 13155768, 26311537, 52623102
(list; graph; listen)
|
|
|
OFFSET
|
0,3
|
|
|
COMMENT
|
The number of integers not exceeding 2^n that are not square-free.
|
|
MATHEMATICA
|
c = 0; k = 1; lst = {}; Do[ While[k <= 2^n, If[ !SquareFreeQ@ k, c++ ]; k++ ]; AppendTo[lst, c], {n, 26}]; lst
|
|
CROSSREFS
|
Cf. A013929, A143658.
|
|
KEYWORD
|
nonn,new
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 31 2008
|
|
|
Search completed in 0.001 seconds
|
