%I #17 Oct 18 2024 14:36:15
%S 1,81,11881,811801,1018081,81018001,100180081,108180801,8100180001,
%T 10001800081,10181011801,810001800001,1000018000081,1008018008001,
%U 80181118180881,81000018000001,100000180000081,100180101018001,1180000888001881,8100000180000001,10000001800000081
%N Squares composed of digits {0,1,8}, not ending with zero.
%C Includes all numbers of the forms (10^k + 9)^2, (9*10^k + 1)^2, (100^k + 4*10^k + 1)^2, and (10*100^k + 9*10^k + 1)^2 for k >= 2. - _Andrew Howroyd_, Oct 18 2024
%H Zhao Hui Du, <a href="/A058422/b058422.txt">Table of n, a(n) for n = 1..91</a>
%H Patrick De Geest, <a href="http://www.worldofnumbers.com/threedigits.htm">Index to related sequences</a>
%H Hisanori Mishima, <a href="http://www.asahi-net.or.jp/~KC2H-MSM/mathland/math02/math0210.htm">Sporadic tridigital solutions</a>
%F a(n) = A058421(n)^2. - _Andrew Howroyd_, Oct 18 2024
%t Select[FromDigits/@Tuples[{0,1,8},17],Mod[#,10]!=0&&IntegerQ[Sqrt[#]]&] (* _Harvey P. Dale_, Sep 09 2022 *)
%Y Cf. A058421.
%K nonn,base
%O 1,2
%A _Patrick De Geest_, Nov 15 2000