|
%I #12 Oct 06 2019 18:17:30
%S 27,33,35,55,57,123,145,147,153,177,453,1497,3747,3873,4497,4797,
%T 10203,10503,31623,1002003,1005003,100020003,100050003,10000200003,
%U 10000500003,1000002000003,1000005000003,100000020000003
%N a(n)^2 has last digit equal to the sum of the other digits.
%F Sequence includes both 10^(2n) + 2*10^n + 3 and 10^(2n) + 5*10^n + 3 for n >= 2.
%t Select[Range[10^6], First@ #1 == Total@ #2 & @@ TakeDrop[IntegerDigits[#^2], -1] &] (* _Michael De Vlieger_, Oct 06 2019 *)
%Y Cf. A054259.
%K base,nonn
%O 0,1
%A George Russell (george(AT)persimmon.com)
%E More terms from _Patrick De Geest_, Feb 15 2000
%E More terms from _Jon E. Schoenfield_, Apr 03 2010
|
