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

0, 1, 10, 11, 26, 100, 101, 110, 260, 276, 776, 1000, 1001, 1010, 1011, 1100, 1101, 2600, 2760, 2776, 7760, 10000, 10001, 10010, 10011, 10100, 10110, 10776, 11000, 11001, 11010, 11076, 26000, 27600, 27760, 77600, 100000, 100001, 100010, 100011, 100100, 100101, 100110, 101000, 101001, 101100, 107760, 110000, 110001, 110010, 110100, 110760, 161761

Offset

1,3

Comments

Generated with DrScheme.

Links

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

J. Wellons, Tables of Shared Digits [archived]

Example

1662107161761^2 = 2762600217177207020621121.

Mathematica

Module[{c={0, 1, 2, 6, 7}, nn=6}, Select[FromDigits/@Tuples[c, nn], SubsetQ[ c, IntegerDigits[ #^2]]&]] (* Harvey P. Dale, Jun 21 2022 *)

Crossrefs

Sequence in context: A051803 A082517 A300376 * A136833 A355631 A056067

Adjacent sequences: A136825 A136826 A136827 * A136829 A136830 A136831

Keyword

base,nonn

Author

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

Status

approved