Re: [問題] 有無辦法讓 equation 等號對齊

作者: cccWccc   2016-11-30 00:15:56
抱歉推文擠不下 又回一篇 兼洗P幣
感謝板友協助 此問題已獲得解決!
下面用 Grid 跟 Column 各做一次
eqns = {
HoldForm[a^b = c], HoldForm[Integrate[a^(b x), {x, d, e}] = c],
HoldForm[c = Integrate[a^(b x), {x, d, e}]],
HoldForm[y = Sum[Sin[(n \[Pi] x)/L], {n, 1, \[Infinity]}]]
};
Grid[Transpose[{
Style[#, "DisplayFormula", FontFamily -> "Times New Roman"] & /@
eqns
}], Alignment -> "="] // TraditionalForm
Column[Style[#, "DisplayFormula", FontFamily -> "Times New Roman"] & /@
eqns, "="] // TraditionalForm
註: "//TraditionalForm" 的字型沒辦法套用到裡面 但可以把 Sin[] 顯示為 sin()
字體就在 Style 裡面強行設定!
作者: jurian0101 (Hysterisis)   2016-11-30 00:21:00
大家應該都很排斥下到MMA的地下室: 底層 Box 表達式所以只要不牽涉 ToBoxes[] (地下室鑰匙) 都好說~~
作者: cccWccc   2016-11-30 00:23:00
曾經嘗copy as cell expression看看裡面長怎樣結果崩潰阿打一個式子要寫這麼多的話 那還是去用latex好了 哈哈

Links booklink

Contact Us: admin [ a t ] ucptt.com