login
Squares written in base 2.
11

%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_