用matlab画阻尼振动包络线

好的，以下是绘制阻尼振动包络线的 MATLAB 代码示例：

% 定义阻尼振动微分方程
m = 1; % 质量
k = 1; % 弹性系数
c = 0.05; % 阻尼系数
f = @(t, y) [y(2); -(k/m)*y(1)-(c/m)*y(2)];

% 求解微分方程
[t, y] = ode45(f, [0, 30], [1, 0]);

% 计算包络线
[b, env_upper, env_lower] = envelope(y(:, 1));

% 绘制包络线和原始曲线
plot(t, y(:, 1), 'b', t, env_upper, 'r--', t, env_lower, 'r--');
xlabel('时间 (s)');
ylabel('位移 (m)');
legend('原始曲线', '包络线');

这段代码会绘制出阻尼振动的原始曲线和包络线，其中 `m` 代表质量，`k` 代表弹性系数，`c` 代表阻尼系数，可以根据需要进行修改。绘图结果如下图所示：


希望这个例子能够帮助你！