OFFSET
1,1
COMMENTS
If m is a term 10*m is another term.
2357 is the first term of A131573 that is not in this sequence (see Example section), the next ones are 2582, 3334, ...
EXAMPLE
149 is a term because 149^2 = 22201 starts with three 2's.
2357 is not a term because 2357^2 = 5555449 starts with four 5's.
MATHEMATICA
Select[Range[32, 3350], (d = IntegerDigits[#^2])[[1]] == d[[2]] == d[[3]] != d[[4]] &] (* Amiram Eldar, Aug 06 2021 *)
PROG
(Python)
def ok(n): s = str(n*n); return len(s) > 3 and s[0] == s[1] == s[2] != s[3]
print(list(filter(ok, range(3347)))) # Michael S. Branicky, Aug 06 2021
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Bernard Schott, Aug 06 2021
STATUS
approved