mathematica中怎样输出的所有数字，弄成一个集合

在 Mathematica 中，可以使用 `Cases` 函数和正则表达式来提取所有数字，并将其转换为集合。具体实现可以参考以下代码：

text = "3.14 is a number, but -2.5 and 10 are also numbers.";
numbers = ToExpression /@ Cases[StringCases[text, NumberString], _String];
set = Union[numbers];

其中，`text` 是包含数字的字符串，`StringCases[text, NumberString]` 用于提取所有数字字符串，`Cases` 函数用于将这些字符串转换为数字，`ToExpression` 函数用于执行字符串转换操作，`Union` 函数用于将所有数字去重并转换为集合。最终，`set` 就是包含所有数字的集合。