A136874 Numbers k such that k and k^2 use only the digits 0, 1, 5, 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, 10900, 90000, 90001, 90010, 90100, 99000, 99001, 99900, 99990, 99999, 100000, 100009, 100090, 100099, 100900, 100901, 100990, 109000, 900000, 900001, 900010, 900100, 901000, 990000, 990001, 990010, 995901, 999000

Offset

1,3

Comments

Generated with DrScheme.

Links

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

J. Wellons, Tables of Shared Digits [archived]

Example

9899585850509^2 = 98001800011598000895559081.

Mathematica

With[{c={0, 1, 5, 8, 9}}, Select[FromDigits/@Tuples[c, 6], SubsetQ[c, IntegerDigits[ #^2]]&]] (* Harvey P. Dale, Apr 26 2022 *)

Crossrefs

Sequence in context: A136867 A136879 A136880 * A136881 A333402 A360947

Adjacent sequences: A136871 A136872 A136873 * A136875 A136876 A136877

Keyword

base,nonn,changed

Author

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

Status

approved