A001737 Squares written in base 2.

0, 1, 100, 1001, 10000, 11001, 100100, 110001, 1000000, 1010001, 1100100, 1111001, 10010000, 10101001, 11000100, 11100001, 100000000, 100100001, 101000100, 101101001, 110010000, 110111001, 111100100, 1000010001, 1001000000, 1001110001, 1010100100, 1011011001

Offset: 0

Author

N. J. A. Sloane

Keywords

• base
• easy
• nonn

Links

• T. D. Noe, Table of n, a(n) for n = 0..1000

Crossrefs

Cf. A000290, A007088, A159918.

Programs

Mathematica

Table[FromDigits[IntegerDigits[n^2, 2]], {n, 0, 50}] (* T. D. Noe, Aug 10 2012 *)

Python

print([int(bin(k**2)[2:]) for k in range(0, 28)]) # Karl-Heinz Hofmann, Feb 01 2022

Formula

a(n) = A007088(A000290(n)). - Reinhard Zumkeller, Apr 25 2009