A137032 Numbers k such that k and k^2 use only the digits 1, 3, 5 and 6.

1, 6, 56, 1156, 3656

Offset

1,2

Comments

Generated with DrScheme.

Links

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

Jonathan Wellons, Tables of Shared Digits [archived]

Example

3656^2 = 13366336.

Mathematica

With[{c={1, 3, 5, 6}}, Select[FromDigits/@Flatten[Table[Tuples[c, n], {n, 4}], 1], SubsetQ[ c, IntegerDigits[ #^2]]&]] (* Harvey P. Dale, May 26 2023 *)

Crossrefs

Sequence in context: A122743 A241031 A268760 * A053421 A083696 A288680

Adjacent sequences: A137029 A137030 A137031 * A137033 A137034 A137035

Keyword

base,nonn,more,changed

Author

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

Status

approved