请教各位大神，mathematica如何引用特殊字符。

我想把一个表达式组中的“{”，替换为“（”，使用中无法进行。请问有什么办法？（例如“5”替换成"88"，是很容易的）
mudi = TraditionalForm[
HoldForm@("已知:点A=" { 1, 2, 3} ",点B=" {3, 5, 5} "。求AB的长度。")]
mudi = ReplaceAll[mudi, {1 -> 888}]
这是没问题的；加上下面这句就不可以了。求救！！！
mudi = ReplaceAll[mudi, {-> (]

deepseek给出的第一种方案，不好用：
(*原始表达式*)
mudi = TraditionalForm[
HoldForm@("已知:点A=" {1, 2, 3} ",点B=" {3, 5, 5} "。求AB的长度。")];
mudi = ToString[mudi, TraditionalForm];
mudi = StringReplace[mudi, "{" -> "("]

deepseek给出的第二种方案，直接红色：
mudi = TraditionalForm[
HoldForm@("已知:点A=" { 1, 2, 3} ",点B=" {3, 5, 5} "。求AB的长度。")]
(*定义列表转括号的规则*)
listToParen =
List -> (RowBox[{"(", RowBox[Riffle[{##}, ","], ")"}] &)
(*替换列表为括号*)
mudi = mudi /. listToParen;

方法肯定还有很多，以上希望对你有所启发

百度Ai搜“mathematica 表达式大括号替换为圆括号”，结果都不好用啊！

十分抱歉我把大吧的回复给误删了（我是想删除我的回复）。感谢大吧回复！尽管这几年，我看了几本mathematica书。但是我这都是照猫画虎。刚才研究了一会，您的指导十分正确。方法很好用。（实际上，我是表达式组，但是采用遍历方法的我也能勉强用了）

大吧的原文大概是这样的：批评我不够进步；提供了解决方法：mudi=mudi /. a_List :> Row[{"(", Row[a, ","], ")"}]；建议我看一篇本贴吧的一个帖子。对不起！

然后，LZ在5楼的楼中楼里提到，5楼直接处理字符串的做法无法正常处理由TraditionalForm表达式转换而成的字符串，这个其实有救：
mudi = TraditionalForm[
HoldForm@("已知:点A=" {1, 2, 3} ",点B=" {3, 5, 5} "。求AB的长度。")];
StringReplace[ToString@mudi, {"\"{\"" -> "\"(\"", "\"}\"" -> "\")\""}]
至于为啥这样可以嘛，你可以观察一下
mudi // ToString // InputForm
的形式。

扫二维码下载贴吧客户端

下载贴吧APP
看高清直播、视频！

17回复贴，共1页

<<返回mathematica吧

分享到:

日	一	二	三	四	五	六