A136838 Numbers k such that k and k^2 use only the digits 0, 1, 3, 4 and 6.

0, 1, 4, 6, 10, 40, 60, 100, 400, 600, 1000, 1146, 4000, 6000, 10000, 10301, 11460, 33631, 40000, 60000, 100000, 103010, 103131, 114600, 336310, 400000, 404306, 600000, 601344, 603444, 660306, 663631, 1000000, 1003001, 1030100, 1031310, 1146000, 1160306, 3336631, 3363100, 3363646, 4000000, 4014304, 4043060, 6000000, 6013440, 6034440

Offset

1,3

Comments

Generated with DrScheme.

Links

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

J. Wellons, Tables of Shared Digits [archived]

Example

643164144134306^2 = 413660116300014343066166101636.

Mathematica

Select[FromDigits/@Tuples[{0, 1, 3, 4, 6}, 7], SubsetQ[{0, 1, 3, 4, 6}, IntegerDigits[ #^2]]&] (* Harvey P. Dale, Aug 14 2017 *)

Crossrefs

Sequence in context: A253048 A271956 A242502 * A234276 A274991 A356755

Adjacent sequences: A136835 A136836 A136837 * A136839 A136840 A136841

Keyword

base,nonn,changed

Author

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

Status

approved