login
A136844
Numbers k such that k and k^2 use only the digits 0, 1, 3, 5 and 7.
1
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
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
KEYWORD
base,nonn
AUTHOR
Jonathan Wellons (wellons(AT)gmail.com), Jan 22 2008
STATUS
approved