A137137 Numbers k such that k and k^2 use only the digits 3, 6, 7, 8 and 9.

3, 6, 63, 83, 86, 833, 836, 876, 883, 887, 937, 8363, 8876, 8887, 8937, 9687, 9833, 9883, 79836, 79867, 93637, 96633, 96886, 98333, 98336, 98376, 98887, 798367, 798667, 936876, 936963, 937383, 968333, 986833, 988937, 989833, 989867, 993367, 998333, 998367, 7983667, 7987363, 7998336, 7998667, 8937387, 8938667, 9363637, 9366637, 9366786

Offset

1,1

Comments

Generated with DrScheme.

Links

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

J. Wellons, Tables of Shared Digits [archived]

Example

968968363768376^2 = 938899689983963839367377677376.

Mathematica

With[{c={3, 6, 7, 8, 9}}, Table[Select[FromDigits/@Tuples[c, n], SubsetQ[c, IntegerDigits[#^2]]&], {n, 7}]]//Flatten (* Harvey P. Dale, Nov 18 2023 *)

Crossrefs

Sequence in context: A219809 A137123 A137133 * A137134 A137090 A137138

Adjacent sequences: A137134 A137135 A137136 * A137138 A137139 A137140

Keyword

base,nonn,changed

Author

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

Status

approved