login
A136864
Numbers k such that k and k^2 use only the digits 0, 1, 4, 7 and 8.
1
0, 1, 10, 88, 100, 878, 880, 1000, 1071, 4141, 8780, 8800, 8878, 10000, 10401, 10710, 41410, 87800, 88000, 88780, 100000, 104010, 107100, 108848, 414100, 878000, 880000, 887800, 1000000, 1004001, 1008701, 1040100, 1071000, 1088480, 1187478, 4141000, 8418441, 8478448, 8780000, 8784878, 8800000, 8878000, 10000000, 10007401, 10040010
OFFSET
1,3
COMMENTS
Generated with DrScheme.
LINKS
J. Wellons, Tables of Shared Digits [archived]
EXAMPLE
878470717087478^2 = 771710800780187811771104400484.
MATHEMATICA
Select[Range[0, 10050000], Union[DigitCount[#, 10, {2, 3, 5, 6, 9}]]==Union[ DigitCount[#^2, 10, {2, 3, 5, 6, 9}]]=={0}&] (* Harvey P. Dale, Apr 06 2011 *)
CROSSREFS
Sequence in context: A114648 A350134 A217417 * A099789 A185060 A125398
KEYWORD
base,nonn
AUTHOR
Jonathan Wellons (wellons(AT)gmail.com), Jan 22 2008
STATUS
approved