|
本帖最后由 wind2100 于 2017-6-18 18:52 编辑
Clear["Global`*"];
peak = 3000; (* PWM 周期*)
peak /= 2;
micro = 256*3;
dataA = Table[
Floor[Sin[(x + 0) Degree]*peak + peak], {x, 0, 360, 360/micro}];
dataB = Table[
Floor[Sin[(x + 120) Degree]*peak + peak], {x, 0, 360, 360/micro}];
dataC = Table[
Floor[Sin[(x + 240) Degree]*peak + peak], {x, 0, 360, 360/micro}];
Length[dataA]
Max[dataA]
Show[
ListPlot[dataA, PlotStyle -> Red],
ListPlot[dataB, PlotStyle -> Green],
ListPlot[dataC, PlotStyle -> Blue]
]
论坛有问题,上传不了图片了... 点上传没反应 要么就是没上传图标 |
阿莫论坛20周年了!感谢大家的支持与爱护!!
曾经有一段真挚的爱情摆在我的面前,我没有珍惜,现在想起来,还好我没有珍惜……
|