Re: [問題] 如何搜尋取代下標?
看板Mathematica作者chungyuandye (養花種魚數月亮賞星星)時間13年前 (2011/07/08 23:37)推噓0(0推 0噓 0→)留言0則, 0人參與討論串2/3 (看更多)
※ 引述《oversky0 (oversky0)》之銘言:
: 請問在 Mathematica 裏要如何搜尋及取代下標(subscript)文字?
data = Subscript[x, #] & /@ Range[10]
以下用pattern match 將下標各+10
data /. Subscript[x_, i_] :> Subscript[x, 10 + i]
將下標移除,變數多的時候比較方便
data /. Subscript[x_, i_] :> ToExpression["x" <> ToString[i]]
--
我打研究室走過 那獨坐電腦前的容顏如苦瓜的糾結
靈感不來 長壽的煙霧不散
研究室如小小的寂寞的城 恰如商管的電梯向晚
http://chungyuandye.twbbs.org
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 118.232.186.105
討論串 (同標題文章)
Mathematica 近期熱門文章
PTT數位生活區 即時熱門文章