login
A137041
Numbers k such that k and k^2 use only the digits 1, 3, 6, 8 and 9.
1
1, 3, 6, 9, 13, 19, 31, 63, 83, 369, 619, 631, 833, 836, 969, 3633, 8131, 31131, 36313, 81619, 81813, 81833, 93869, 93986, 96886, 98336, 116881, 191881, 336333, 816313, 818119, 818131, 818333, 836133, 916333, 968986, 969119, 1181813, 1366881, 1966313, 3161313, 3363981, 3631969, 3698896, 8183333, 9161833, 9968119, 9969119, 9996969, 13663333
OFFSET
1,2
COMMENTS
Generated with DrScheme.
LINKS
J. Wellons, Tables of Shared Digits [archived]
EXAMPLE
981681383196131^2 = 963698338113868991696813369161.
MATHEMATICA
With[{d={1, 3, 6, 8, 9}}, Table[Select[FromDigits/@ Tuples[d, n], SubsetQ[ d, IntegerDigits[ #^2]]&], {n, 8}]]//Flatten (* Harvey P. Dale, Aug 15 2016 *)
CROSSREFS
Sequence in context: A117469 A073359 A310161 * A153006 A181970 A316531
KEYWORD
base,nonn
AUTHOR
Jonathan Wellons (wellons(AT)gmail.com), Jan 22 2008
STATUS
approved