login
A137060
Numbers k such that k and k^2 use only the digits 1, 5, 6, 7 and 8.
1
1, 76, 81, 766, 816, 881, 7181, 7666, 71881, 76666, 81681, 81766, 88181, 88776, 766666, 767181, 817666, 817776, 876766, 7666666, 7866881, 8115766, 8176666, 76666666, 81766666, 81767181, 87617166, 87857166, 88157181, 88761881, 766587576, 766658716, 766658776, 766666666, 767187576, 785187166, 811657666, 811711881, 816156766
OFFSET
1,2
COMMENTS
Generated with DrScheme.
LINKS
J. Wellons, Tables of Shared Digits [archived]
EXAMPLE
876861765716681^2 = 768886556175775558717561655761.
MATHEMATICA
With[{c={1, 5, 6, 7, 8}}, Select[Flatten[Table[FromDigits/@Tuples[c, n], {n, 9}]], SubsetQ[c, IntegerDigits[#^2]]&]] (* Harvey P. Dale, Nov 15 2018 *)
CROSSREFS
Sequence in context: A031321 A095599 A095587 * A095573 A095559 A095545
KEYWORD
base,nonn
AUTHOR
Jonathan Wellons (wellons(AT)gmail.com), Jan 22 2008
STATUS
approved