%I #27 Feb 01 2022 07:12:23
%S 0,1,100,1001,10000,11001,100100,110001,1000000,1010001,1100100,
%T 1111001,10010000,10101001,11000100,11100001,100000000,100100001,
%U 101000100,101101001,110010000,110111001,111100100,1000010001,1001000000,1001110001,1010100100,1011011001
%N Squares written in base 2.
%H T. D. Noe, <a href="/A001737/b001737.txt">Table of n, a(n) for n = 0..1000</a>
%F a(n) = A007088(A000290(n)). - _Reinhard Zumkeller_, Apr 25 2009
%t Table[FromDigits[IntegerDigits[n^2, 2]], {n, 0, 50}] (* _T. D. Noe_, Aug 10 2012 *)
%o (Python) print([int(bin(k**2)[2:]) for k in range(0, 28)]) # _Karl-Heinz Hofmann_, Feb 01 2022
%Y Cf. A000290, A007088, A159918.
%K base,easy,nonn
%O 0,3
%A _N. J. A. Sloane_