A204691 Numbers n such that n contains exactly 5 digits, all distinct, and n^2 contains exactly 9 distinct digits.
10278, 12543, 12586, 13268, 13278, 13698, 14098, 15963, 16549, 16854, 17529, 18072, 19023, 20316, 20513, 20754, 21397, 21439, 23019, 23178, 24807, 25941, 26351, 26409, 27105, 27984, 28346, 28731, 29034, 29106
Offset: 1
Crossrefs
Subsequence of A054037.
Programs
-
Mathematica
Select[Range[10000, Sqrt[10^9]], Length[Union[IntegerDigits[#]]] == 5 && Length[Union[IntegerDigits[#^2]]] == 9 &] (* T. D. Noe, Jan 18 2012 *)
Comments