A001738 a(n) = n^2 written in base 3.
0, 1, 11, 100, 121, 221, 1100, 1211, 2101, 10000, 10201, 11111, 12100, 20021, 21021, 22100, 100111, 101201, 110000, 111101, 112211, 121100, 122221, 201121, 210100, 212011, 221001, 1000000, 1002001, 1011011, 1020100, 1022121, 1101221, 1111100, 1120211
Offset: 0
Links
- T. D. Noe, Table of n, a(n) for n = 0..1000
Programs
-
Mathematica
Table[FromDigits[IntegerDigits[n^2, 3]], {n, 0, 50}] (* T. D. Noe, Aug 10 2012 *)