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

7, 8, 67, 88, 667, 864, 886, 887, 974, 6667, 8874, 8887, 66667, 68474, 86478, 87664, 94788, 94867, 98978, 666667, 947886, 947887, 948678, 984878, 988878, 988887, 6666667, 6846886, 6974788, 6974867, 6977664, 9469788, 9478764, 9897978, 9984878, 66666667, 69776786, 69977687, 69997764, 88694864, 88796676, 88868878, 98476788, 98877687

Offset

1,1

Comments

Generated with DrScheme.

Links

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

J. Wellons, Tables of Shared Digits [archived]

Example

946968768486478^2 = 896749848488796768874868844484.

Mathematica

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

Crossrefs

Sequence in context: A041023 A041108 A248276 * A251626 A256340 A192373

Adjacent sequences: A137142 A137143 A137144 * A137146 A137147 A137148

Keyword

base,nonn

Author

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

Status

approved