A028907 Arrange digits of squares in ascending order.
0, 1, 4, 9, 16, 25, 36, 49, 46, 18, 1, 112, 144, 169, 169, 225, 256, 289, 234, 136, 4, 144, 448, 259, 567, 256, 667, 279, 478, 148, 9, 169, 124, 189, 1156, 1225, 1269, 1369, 1444, 1125, 16, 1168, 1467, 1489, 1369, 225, 1126, 229, 234, 124, 25, 126
Offset: 0
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Crossrefs
Cf. A028908.
Programs
-
Mathematica
Table[FromDigits[Sort[IntegerDigits[n^2]]], {n, 0, 49}] (* Alonso del Arte, Feb 21 2014 *)
Extensions
More terms from Patrick De Geest, Apr 15 1998
Comments