login
A136879
Numbers k such that k and k^2 use only the digits 0, 1, 6, 8 and 9.
1
0, 1, 9, 10, 90, 99, 100, 109, 900, 901, 990, 999, 1000, 1009, 1090, 9000, 9001, 9010, 9900, 9990, 9999, 10000, 10009, 10090, 10099, 10801, 10900, 81619, 90000, 90001, 90010, 90100, 99000, 99001, 99900, 99990, 99999, 100000, 100009, 100090, 100099, 100900, 100901, 100990, 108010, 109000, 816190, 900000, 900001, 900010, 900100, 901000, 990000
OFFSET
1,3
COMMENTS
Generated with DrScheme.
LINKS
J. Wellons, Tables of Shared Digits [archived]
EXAMPLE
90106101906619^2 = 8119109600806008186996011161.
MATHEMATICA
Module[{nn=6, c={0, 1, 6, 8, 9}}, Select[FromDigits/@Tuples[c, nn], SubsetQ[ c, IntegerDigits[ #^2]]&]] (* Harvey P. Dale, Nov 30 2022 *)
CROSSREFS
Sequence in context: A119072 A347183 A136867 * A136880 A136874 A136881
KEYWORD
base,nonn
AUTHOR
Jonathan Wellons (wellons(AT)gmail.com), Jan 22 2008
STATUS
approved