A136984 Numbers k such that k and k^2 use only the digits 1, 2, 3, 8 and 9.

1, 3, 9, 11, 91, 111, 139, 911, 1389, 1823, 1839, 1983, 2983, 9123, 18391, 31339, 93989, 181339, 199823, 299823, 313339, 313391, 913139, 939889, 1811983, 1813339, 1983233, 2883123, 2981339, 2983139, 9122983, 9393239, 11128339, 11323833, 13828923, 13889323, 13921889, 18393989, 19833891, 19983323, 19998233, 19998323, 29813391, 29818333

Offset

1,2

Comments

Generated with DrScheme.

Links

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

J. Wellons, Tables of Shared Digits [archived]

Example

198298292829823^2 = 39322212939222231813238211329.

Mathematica

With[{c={1, 2, 3, 8, 9}}, Select[Flatten[Table[FromDigits/@Tuples[c, n], {n, 8}]], SubsetQ[c, IntegerDigits[#^2]]&]] (* Harvey P. Dale, Jan 11 2019 *)

Crossrefs

Sequence in context: A088877 A069871 A061957 * A168400 A310318 A310319

Adjacent sequences: A136981 A136982 A136983 * A136985 A136986 A136987

Keyword

base,nonn,changed

Author

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

Status

approved