login
A137104
Numbers k such that k and k^2 use only the digits 2, 4, 6, 8 and 9.
1
2, 8, 22, 68, 92, 222, 262, 264, 288, 668, 964, 6668, 6962, 9288, 9842, 26262, 49462, 49692, 49842, 66668, 69462, 82864, 99462, 99842, 494262, 494462, 499462, 649842, 666668, 684462, 984288, 999462, 4944662, 4946662, 4989886, 4994622, 4994662, 4996886, 4996962, 4998268, 6666668, 6994462, 6999462, 8284262, 9469262, 9994622, 29482622, 49294288
OFFSET
1,1
COMMENTS
Generated with DrScheme.
LINKS
J. Wellons, Tables of Shared Digits [archived]
EXAMPLE
984829269296292^2 = 969888689662668428628884949264.
MATHEMATICA
With[{c={2, 4, 6, 8, 9}}, Flatten[Table[Select[FromDigits/@Tuples[ c, n], SubsetQ[ c, IntegerDigits[ #^2]]&], {n, 8}]]] (* The program uses the SubsetQ function from Mathematica version 10 *) (* Harvey P. Dale, Nov 15 2014 *)
CROSSREFS
Sequence in context: A261561 A017928 A102880 * A265951 A178159 A262720
KEYWORD
base,nonn
AUTHOR
Jonathan Wellons (wellons(AT)gmail.com), Jan 22 2008
STATUS
approved