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

0, 1, 10, 100, 1000, 1071, 10000, 10710, 100000, 107100, 1000000, 1071000, 10000000, 10710000, 100000000, 107100000, 1000000000, 1071000000, 10000000000, 10710000000, 100000000000, 107100000000, 1000000000000, 1071000000000, 10000000000000, 10710000000000, 100000000000000, 107100000000000

Offset

1,3

Comments

Generated with DrScheme.

Links

Table of n, a(n) for n=1..28.

J. Wellons, Tables of Shared Digits [archived]

Example

107100000000000^2 = 11470410000000000000000000000.

Mathematica

With[{c={0, 1, 4, 7}}, Select[Flatten[FromDigits/@Tuples[c, 15]], SubsetQ[ c, IntegerDigits[ #^2]]&]] (* Harvey P. Dale, Feb 08 2023 *)

Crossrefs

Sequence in context: A115798 A077439 A136839 * A031201 A228989 A072083

Adjacent sequences: A136860 A136861 A136862 * A136864 A136865 A136866

Keyword

base,nonn,changed

Author

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

Status

approved