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

2, 8, 22, 26, 28, 68, 82, 88, 262, 278, 472, 474, 478, 668, 826, 2622, 2762, 2878, 4762, 6668, 8762, 8768, 8822, 8874, 26878, 27826, 28678, 66668, 66878, 68474, 82878, 86478, 87662, 88474, 666668, 666878, 684674, 687668, 822662, 2624478, 2724472, 2768474, 2867878, 2878626, 6666668, 6666878, 6684674, 6842826, 6886674, 8226474, 8274472

Offset

1,1

Comments

Generated with DrScheme.

Links

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

J. Wellons, Tables of Shared Digits [archived]

Example

876862462862762^2 = 768887778777748667624446268644.

Mathematica

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

Crossrefs

Sequence in context: A085077 A272827 A153827 * A284922 A212970 A212683

Adjacent sequences: A137098 A137099 A137100 * A137102 A137103 A137104

Keyword

base,nonn,changed

Author

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

Status

approved