A136872 Numbers k such that k and k^2 use only the digits 0, 1, 5, 7 and 8.

0, 1, 10, 100, 1000, 10000, 100000, 877501, 1000000, 1008751, 8775010, 10000000, 10007751, 10087510, 87750100, 100000000, 100077510, 100507751, 100875100, 877501000, 1000000000, 1000775100, 1005077510, 1008751000, 1008815501, 8775010000, 10000000000, 10007751000, 10050775100, 10050775501, 10087510000, 10088155010, 10870057751, 87071818501, 87750100000

Offset

1,3

Comments

Generated with DrScheme.

Links

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

J. Wellons, Tables of Shared Digits [archived]

Example

870517087810501^2 = 757800000170075508718085871001.

Mathematica

With[{c={0, 1, 5, 7, 8}}, Select[FromDigits/@Tuples[c, 11], SubsetQ[c, IntegerDigits[ #^2]]&]] (* Harvey P. Dale, Sep 13 2019 *)

Crossrefs

Sequence in context: A029795 A136844 A136842 * A119084 A136875 A135654

Adjacent sequences: A136869 A136870 A136871 * A136873 A136874 A136875

Keyword

base,nonn

Author

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

Extensions

More terms from Harvey P. Dale, Sep 13 2019

Status

approved