A392480 - OEIS

A392480

Squares with non-distinct digits.

100, 121, 144, 225, 400, 441, 484, 676, 900, 1156, 1225, 1444, 1521, 1600, 1681, 2025, 2116, 2209, 2500, 3136, 3364, 3600, 3844, 3969, 4225, 4489, 4624, 4900, 5625, 5776, 5929, 6400, 6561, 6889, 7225, 7744, 8100, 8281, 8464, 8836, 9409, 10000, 10201, 10404, 10609

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

COMMENTS

Contains all but 611 squares and all squares > 99066^2 = 9814072356.

LINKS

Michael S. Branicky, Table of n, a(n) for n = 1..10000

FORMULA

{k^2 | A107846(k^2) > 0}.

MAPLE

q:= n-> (l-> nops(l)<>nops({l[]}))(convert(n, base, 10)):

select(q, [i^2$i=0..103])[]; # Alois P. Heinz, Jan 17 2026

MATHEMATICA

Select[Range[0, 103]^2, CountDistinct[IntegerDigits[#]] < IntegerLength[#] &] (* Stefano Spezia, Jan 18 2026 *)

PROG

(Python)

print([k**2 for k in range(1, 104) if len(s:=str(k**2)) > len(set(s))])

CROSSREFS

Intersection of A000290 and A109303.

Cf. A107846, A073064 (same for primes), A078255.

Sequence in context: A071987 A365820 A095633 * A228103 A331543 A063009

Adjacent sequences: A392477 A392478 A392479 * A392481 A392482 A392483

KEYWORD

nonn,base,easy

AUTHOR

Michael S. Branicky, Jan 13 2026

STATUS

approved