A225565 Numbers with repeated digits, whose squares do not contain any repeated digits.
33, 44, 55, 66, 99, 113, 116, 117, 118, 133, 144, 181, 191, 199, 224, 226, 228, 232, 233, 252, 272, 282, 292, 299, 311, 322, 323, 353, 442, 445, 557, 616, 626, 661, 677, 686, 717, 733, 737, 757, 777, 778, 797, 799, 855, 884, 889, 929, 1017, 1113, 1117
Offset: 1
Examples
117 is a member since it has repeated digits but 117^2=13689 contains no repeated digits.
Links
- T. D. Noe, Table of n, a(n) for n = 1..274
Crossrefs
Cf. A119509.
Programs
-
Mathematica
mx[n_]:=Max[DigitCount[n]]; Select[Range[1150],mx[#]>1 && mx[#^2]<=1 &]
Comments