%I #19 Feb 23 2014 03:15:45
%S 0,1,4,9,16,25,36,49,46,18,1,112,144,169,169,225,256,289,234,136,4,
%T 144,448,259,567,256,667,279,478,148,9,169,124,189,1156,1225,1269,
%U 1369,1444,1125,16,1168,1467,1489,1369,225,1126,229,234,124,25,126
%N Arrange digits of squares in ascending order.
%C Leading zeros are discarded (e.g., 30^2 = 900 -> 009 becomes 9).
%H Vincenzo Librandi, <a href="/A028907/b028907.txt">Table of n, a(n) for n = 0..1000</a>
%t Table[FromDigits[Sort[IntegerDigits[n^2]]], {n, 0, 49}] (* _Alonso del Arte_, Feb 21 2014 *)
%Y Cf. A028908.
%K nonn,base
%O 0,3
%A _N. J. A. Sloane_
%E More terms from _Patrick De Geest_, Apr 15 1998