The OEIS is supported by the many generous donors to the OEIS Foundation.
%I #14 Feb 09 2021 02:37:46
%S 0,0,1,2,5,12,25,50,99,198,400,803,1605,3210,6422,12848,25692,51384,
%T 102784,205563,411115,822234,1644470,3288958,6577915,13155768,
%U 26311537,52623102,105246259,210492628,420985102,841970065,1683940202,3367880511,6735761133,13471522233
%N a(n) = 2^n - A143658(n).
%C The number of integers not exceeding 2^n that are not squarefree.
%H Amiram Eldar, <a href="/A101836/b101836.txt">Table of n, a(n) for n = 0..64</a> (calculated from the b-file at A143658)
%t c = 0; k = 1; lst = {}; Do[ While[k <= 2^n, If[ !SquareFreeQ@ k, c++ ]; k++ ]; AppendTo[lst, c], {n, 0, 26}]; lst
%Y Cf. A013929, A143658.
%K nonn
%O 0,4
%A _Robert G. Wilson v_, Aug 31 2008
%E a(0) inserted and more terms added by _Amiram Eldar_, Feb 09 2021