WOLFRAM

Wolfram 语言与系统参考资料中心

调幅信号

根据一组独立的分数布朗运动过程，可视化一个调幅信号.

Wolfram Language code: a = RandomFunction[FractionalBrownianMotionProcess[.3], {1, 5000, 1}]["PathStates"];
Wolfram Language code: b = RandomFunction[FractionalBrownianMotionProcess[.8], {1, 5000, 1}]["PathStates"];
Wolfram Language code: ListLinePlot[Table[a[[ t]] Cos[3 t] + b[[t]] Sin[3 t], {t, 1, 5000}], ColorFunction -> "Rainbow", ImageSize -> 200]