[請益] 關於化簡

[bonus1123 (bonus)]

不好意思，最近嘗試要把所有用到的方程式打進電腦裡裡，方便管理也順便驗算，

但目前碰到一個很小的問題跨越不了 QQ 就是該如何化簡方程式。

舉例來說：

Clear["Global`*"]

d11 = (p11)^(-\[Sigma]) (P1)^(\[Sigma] - 1) Y1
d12 = (p12)^(-\[Sigma]) (P2)^(\[Sigma] - 1) Y2

p12 = (\[Tau])*(p11)

d11
d12

h = ((\[Sigma] - 1)/\[Sigma]) (d11 + \[Tau] (d12))

Factor[h]
Expand[h]


----------------------------------------------------

h 裡面會出現 (\[Tau])((\[Tau])p11)^(-\[Sigma])


有沒有辦法使得 (\[Tau]) 項合併次方呢，就是(\[Tau])的次方變成(1-\[Sigma])？

試了一個小時突然覺得我自己合併次方再輸入好像快一點Q Q

--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 140.109.122.248
※ 文章網址: https://www.ptt.cc/bbs/Mathematica/M.1449641641.A.B11.html
※ 編輯: bonus1123 (140.109.122.248), 12/09/2015 14:15:03
→ LPH66: ExpandAll 再 Simplify 看看?
→ bonus1123: 回到原樣，大哭QQ
→ shengwey: ComplexExpand?
→ bonus1123: 謝謝樓上各位，我只是肖想漂亮的結果，可以省下人工
→ bonus1123: 化簡的時間拉QQ
※ 編輯: bonus1123 (140.109.122.248), 12/10/2015 10:30:19
推 acehkr: 可以使用PowerExpand[h] ^_^
推 mfluder: Mathematica is being agnosgic about branch cuts
→ mfluder: If you are sure, "/. {(a_ b_)^c_ -> a^c b^c}" will do