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

0, 1, 10, 100, 1000, 10000, 100000, 130501, 550501, 1000000, 1305010, 5505010, 7553501, 10000000, 10550501, 13050100, 55050100, 55055001, 57533501, 57733501, 73055001, 75535010, 100000000, 105505010, 130501000, 131531501, 550501000, 550550010, 575335010, 575355001, 577335010, 730550010, 755350100, 757033751

Offset

1,3

Comments

Generated with DrScheme.

Links

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

J. Wellons, Tables of Shared Digits [archived]

Example

130503170503751^2 = 17031077511531105035105070001.

Mathematica

With[{c={0, 1, 3, 5, 7}}, Select[FromDigits/@Tuples[c, 9], SubsetQ[c, IntegerDigits[#^2]]&]] (* Harvey P. Dale, Feb 04 2024 *)

Crossrefs

Sequence in context: A136854 A029778 A029795 * A136842 A136872 A119084

Adjacent sequences: A136841 A136842 A136843 * A136845 A136846 A136847

Keyword

base,nonn

Author

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

Status

approved