OFFSET
1,1
LINKS
Michael S. Branicky, Table of n, a(n) for n = 1..10000
EXAMPLE
39 is in this sequence because 39^2 = 1521 has 5 as largest digit.
MATHEMATICA
Select[Sqrt[ #]&/@(FromDigits/@Select[Tuples[ Range[ 0, 5], 7], Max[#] == 5&]), IntegerQ] (* Harvey P. Dale, Sep 23 2021 *)
PROG
(PARI) select( is_A295005(n)=n&&vecmax(digits(n^2))==5 , [0..999]) \\ The "n&&" avoids an error message for n=0.
(Python)
def aupto(limit):
alst = []
for k in range(1, limit+1):
if max(str(k*k)) == "5": alst.append(k)
return alst
print(aupto(1050)) # Michael S. Branicky, May 15 2021
CROSSREFS
KEYWORD
nonn,base
AUTHOR
M. F. Hasler, Nov 12 2017
STATUS
approved