The OEIS is supported by the many generous donors to the OEIS Foundation.
%I #12 Aug 13 2024 22:53:44
%S 729,1089,1225,3025,3249,15129,21025,21609,23409,31329,205209,2241009,
%T 14040009,15000129,20223009,23011209,104101209,110313009,1000014129,
%U 1004010012009,1010031030009,10004001000120009,10010003100300009
%N Squares having last digit equal to the sum of the other digits.
%F a(n) = A030134(n)^2. - _Andrew Howroyd_, Aug 13 2024
%t Select[Range[101*10^6]^2,Length[Union[Total/@TakeDrop[IntegerDigits[#],-1]]] == 1&] (* _Harvey P. Dale_, Aug 26 2019 *)
%Y Cf. A030134.
%K nonn,base
%O 1,1
%A _Patrick De Geest_, Feb 15 2000
%E Offset changed by _Andrew Howroyd_, Aug 13 2024