使用Mathematica绘制复数域的傅里叶变化图(幅度、相位)
发布于 2022-03-29
f[x_] := Which[-1 <= x < 1, E^(-x)] T = 2; a[n_] := (1/T)*I …
「雪霁融雾月,冰消凝夜雨」
f[x_] := Which[-1 <= x < 1, E^(-x)] T = 2; a[n_] := (1/T)*I …
Plot[, {x, -2, 2}, Epilog -> {Arrow[{{-3/2, 0}, {-3/2, 0.5}}], …
先上图: 纵轴为K,横轴为\xi=Q_L \frac{2\Delta f}{f_0},当\xi _ 0 = 0,1,2 时的函数图 …