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

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

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

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

Adjacent sequences: A136861 A136862 A136863 * A136865 A136866 A136867

Keyword

base,nonn

Author

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

Status

approved