login
A137132
Numbers k such that k and k^2 use only the digits 3, 5, 6, 7 and 8.
1
6, 76, 766, 876, 7666, 8566, 8756, 8876, 57756, 76576, 76666, 85666, 753576, 766576, 766666, 856666, 7587856, 7666576, 7666666, 8566666, 8576576, 8765766, 75336356, 76666576, 76666666, 85666666, 87558876, 88536356, 577558376, 577566756, 577653576, 758733376, 765883566, 766666576, 766666666, 767383566, 856666666, 857768376
OFFSET
1,1
COMMENTS
Generated with DrScheme.
LINKS
Jonathan Wellons, Tables of Shared Digits [archived]
EXAMPLE
765738688383876^2 = 586355738887858753336736783376.
MATHEMATICA
With[{c={3, 5, 6, 7, 8}}, Select[FromDigits/@Flatten[Table[Tuples[c, n], {n, 9}], 1], SubsetQ[c, IntegerDigits[#^2]]&]] (* Harvey P. Dale, Feb 19 2018 *)
CROSSREFS
Sequence in context: A016090 A181343 A241072 * A053337 A199026 A155643
KEYWORD
base,nonn
AUTHOR
Jonathan Wellons (wellons(AT)gmail.com), Jan 22 2008
STATUS
approved