%I #15 Mar 11 2024 05:08:48
%S 4,25,225,4225,55225,442225,4545424,5452225,42445225,44422225,
%T 544522225,2224254244,4424245225,4444222225,4554225225,54445222225,
%U 55255554225,444242245225,444442222225,5444452222225,44442422245225,44444422222225,544444522222225
%N Squares composed of digits {2,4,5}.
%H Zhao Hui Du, <a href="/A031152/b031152.txt">Table of n, a(n) for n = 1..106</a>
%H Patrick De Geest, <a href="http://www.worldofnumbers.com/threedigits.htm">Squares containing at most three distinct digits, Index entries for related sequences</a>
%t Flatten[Table[Select[FromDigits/@Tuples[{2,4,5},n],IntegerQ[Sqrt[#]]&],{n,14}]] (* _Harvey P. Dale_, Oct 07 2013 *)
%Y Cf. A031154.
%K nonn,base
%O 1,1
%A _Patrick De Geest_
%E Extended and corrected by author 03/2000.
%E a(22)-a(23) from _Alois P. Heinz_, Apr 01 2015
|