login
a(n)^2 has last digit equal to the sum of the other digits.
1

%I #15 Aug 13 2024 21:29:59

%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 1,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

%E Offset changed by _Andrew Howroyd_, Aug 13 2024