A348303 a(n) is the largest n-digit number whose square has a digital sum equal to A348300(n).

7, 83, 937, 9417, 94863, 987917, 9893887, 99483667, 994927133, 9486778167, 99497231067, 999949483667, 9892825177313

Offset: 1

Author

Bernardo Recamán and Freddy Barrera, Oct 10 2021

Keywords

• nonn
• base
• more

Crossrefs

Cf. A004159, A348300.

Programs

Mathematica

Array[#1 + Position[#2, Max[#2]][[-1, -1]] - 1 & @@ {#1, Map[Total@ IntegerDigits[#^2] &, Range[#1, #2]]} & @@ {10^(# - 1), 10^# - 1} &, 8] (* Michael De Vlieger, Oct 12 2021 *)

Extensions

a(11) from Chai Wah Wu, Nov 18 2021

a(12)-a(13) from Martin Ehrenstein, Nov 20 2021