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

0, 887, 8870, 8886, 8887, 87676, 87687, 88700, 88860, 88870, 88887, 89867, 876760, 876870, 887000, 887676, 888600, 888700, 888870, 898670, 989897, 7788887, 7796076, 8767600, 8768700, 8870000, 8876760, 8886000, 8887000, 8888700, 8986700, 8998667, 9888887, 9898970, 77888870, 77960760, 87676000, 87687000, 87787687, 87788887, 88700000

Offset

1,2

Comments

Generated with DrScheme.

Links

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

J. Wellons, Tables of Shared Digits [archived]

Example

898709006786897^2 = 807677878879890878007970888609.

Mathematica

With[{c={0, 6, 7, 8, 9}}, Select[FromDigits/@Tuples[c, 8], SubsetQ[ c, IntegerDigits[ #^2]]&]] (* Harvey P. Dale, Jan 31 2020 *)

Crossrefs

Sequence in context: A031938 A165504 A351667 * A232152 A202446 A043523

Adjacent sequences: A136963 A136964 A136965 * A136967 A136968 A136969

Keyword

base,nonn,changed

Author

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

Status

approved