A136879 Numbers k such that k and k^2 use only the digits 0, 1, 6, 8 and 9.

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

Jonathan Wellons, Table of n, a(n) for n = 1..1291

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

Adjacent sequences: A136876 A136877 A136878 * A136880 A136881 A136882

Keyword

base,nonn,changed

Author

Jonathan Wellons (wellons(AT)gmail.com), Jan 22 2008

Status

approved