A136854 Numbers k such that k and k^2 use only the digits 0, 1, 4 and 5.

0, 1, 10, 100, 1000, 10000, 100000, 100501, 1000000, 1005010, 10000000, 10005001, 10050100, 100000000, 100050010, 100501000, 1000000000, 1000050001, 1000500100, 1005010000, 10000000000, 10000500010, 10005001000, 10050100000, 100000000000, 100000500001, 100005000100, 100050010000, 100501000000, 1000000000000

Offset

1,3

Comments

Generated with DrScheme.

Links

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

Jonathan Wellons, Tables of Shared Digits

Example

100501000000000^2 = 10100451001000000000000000000.

Mathematica

With[{c={0, 1, 4, 5}}, Select[FromDigits/@Tuples[c, 13], SubsetQ[c, IntegerDigits[ #^2]]&]] (* Harvey P. Dale, Apr 15 2018 *)

Crossrefs

Cf. A000290.

Sequence in context: A136845 A272503 A136837 * A029778 A029795 A136844

Adjacent sequences: A136851 A136852 A136853 * A136855 A136856 A136857

Keyword

base,nonn

Author

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

Status

approved