A136986 Numbers k such that k and k^2 use only the digits 1, 2 and 4.
1, 2, 11, 12, 21
Offset: 1
Examples
21^2 = 441.
Links
- Jonathan Wellons, Tables of Shared Digits [archived]
Crossrefs
Cf. A137002.
Programs
-
Mathematica
Table[Select[(FromDigits/@Tuples[{1,2,4},d]),SubsetQ[{1,2,4},IntegerDigits[ #^2]]&],{d,2}]//Flatten (* Harvey P. Dale, Jan 10 2022 *)
Comments