|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
Generated with DrScheme.
|
|
LINKS
|
|
|
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
|
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Jonathan Wellons (wellons(AT)gmail.com), Jan 22 2008
|
|
STATUS
|
approved
|
|
|
|