Mathematica SPWM

来源：互联网发布：手机淘宝如何上传视频编辑：程序博客网时间：2024/05/22 06:52

原理 https://wenku.baidu.com/view/8165817a31b765ce05081472.html

n = 1000; (* 半波打出PWM个数个数越多越接近正弦波*)

w = 2*Pi*f;                                                (* 要输出波形角频率*)
f = 50;

um = 180;                                                         (*\输出电压反射到原边电压*)
vd = 380;                                                         (* \输入Vbus电压*)

tfull = N[1/(2*f*n)];                                        (*数字电源开关周期*)
f = 1/tfull                                                     (*\数字电源开关频率*)

m = um/vd;                                                      (* 调制比*)

ton = N[Table[m/w*(Cos[(k - 1)*Pi/n] - Cos[k*Pi/n]), {k, 1, n}]]; (*导通时间*)

ListPlot[ton]

d = N[Table[m/w*(Cos[(k - 1)*Pi/n] - Cos[k*Pi/n]), {k, 1, n}]]/(Pi/w)*100; (* 占空比*)

阅读全文

0 0