A136909 Numbers k such that k and k^2 use only the digits 0, 2, 4, 8 and 9.

0, 2, 20, 22, 200, 202, 220, 222, 288, 298, 498, 2000, 2002, 2020, 2022, 2200, 2202, 2220, 2880, 2980, 2998, 4980, 4998, 20000, 20002, 20020, 20022, 20200, 20220, 20222, 22000, 22002, 22020, 22200, 22202, 28800, 28998, 29800, 29980, 29998, 44998, 48998, 49800, 49980, 49998, 89498, 200000, 200002, 200020, 200022, 200200, 200202, 200220, 200222

Offset

1,2

Comments

Generated with DrScheme.

Links

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

J. Wellons, Tables of Shared Digits [archived]

Example

92098040202^2 = 8482049009049208200804.

Mathematica

Module[{c={0, 2, 4, 8, 9}, t}, t=FromDigits/@Tuples[c, 6]; Select[t, SubsetQ[c, IntegerDigits[#^2]]&]] (* Harvey P. Dale, Nov 26 2014 *)

Crossrefs

Sequence in context: A112405 A136885 A359611 * A169965 A202170 A136908

Adjacent sequences: A136906 A136907 A136908 * A136910 A136911 A136912

Keyword

base,nonn,changed

Author

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

Status

approved