[問題] 如何將函數的形式改寫? (以弦波相加為例)
我們知道兩電磁波的疊合，會得到一個相同頻率但不同振幅、相位的電磁波
如：
A*Cos[w*t+φ1] + B*Cos[w*t+φ2] = c*Cos[w*t+φ3]
其中
c =(A^2+B^2+2A*B*Cos[φ2-φ1])^(1/2)
φ3 = ArcTan[(A*Sin[φ1]+B*Sin[φ2])/(A*Cos[φ1]+B*Cos[φ2])]
(以上變數皆為實數)
我想用Mathematica將A*Cos[w*t+φ1] + B*Cos[w*t+φ2]
改寫為c*Cos[w*t+φ3]的形式，請問程式要怎麼寫才能做到?
(試過用TrigExpand,TrigReduce,TrigFactor,Simplify都失敗)
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.113.76.51
※ 編輯: wonds 來自: 140.113.76.51 (07/21 14:25)
Mathematica 近期熱門文章
PTT數位生活區 即時熱門文章
