A054033 Numbers n such that n^2 contains exactly 5 different digits.

113, 116, 117, 118, 124, 126, 128, 133, 134, 136, 137, 142, 144, 147, 148, 152, 153, 154, 169, 172, 174, 175, 176, 178, 179, 181, 186, 189, 191, 193, 195, 196, 198, 199, 203, 209, 213, 214, 217, 219, 224, 226, 228, 232, 233, 248, 252, 259, 267, 268, 269

Offset

1,1

Comments

The first 66 terms are the only ones whose squares contain no repeated digits. - Charles R Greathouse IV, Feb 09 2015

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Maple

f := []; for i from 0 to 200 do if nops({op(convert(i^2, base, 10))})=5 then f := [op(f), i] fi; od; f;

Mathematica

Select[Range[101, 500], Count[DigitCount[#^2], 0]==5&] (* Harvey P. Dale, Feb 08 2015 *)

Prog

(PARI) is(n)=#Set(digits(n^2))==5 \\ Charles R Greathouse IV, Feb 08 2015

Crossrefs

Cf. A016069, A054031, A054032, A054034, A054035, A054036, A054037, A054038, A054039.

Sequence in context: A242557 A345072 A214503 * A167843 A159466 A284598

Adjacent sequences: A054030 A054031 A054032 * A054034 A054035 A054036

Keyword

nonn,base

Author

Asher Auel, Feb 29 2000

Status

approved