附 绘图 mathematica 代码如下:
x1x1 = n UnitStep[n + 2];
2x2 = (2^-n + 1) UnitStep[n + 1];
3x3 = Which[n < 0, 3*2^n, n >= 0, n + 2];
4x4 = x2 + x3;
5
6DiscretePlot[x1, {n, -3, 3}, PlotRange -> All, GridLines -> Automatic]
7DiscretePlot[x2, {n, -2, 5}, PlotRange -> All, GridLines -> Automatic]
8DiscretePlot[x3, {n, -5, 3}, PlotRange -> All, GridLines -> Automatic]
9DiscretePlot[x4, {n, -3, 3}, PlotRange -> All, GridLines -> Automatic]
周期性,
非周期.
备注 对于
迭代得
输出信号为
波形图略.
二阶差分方程(二阶系统).
二阶差分方程(二阶系统).
备注 不知道有什么便捷的工具可以绘制系统框图;上图直接截的标答.
特征根为
于是
大概是题目打错了吧...这个计算量挺离谱的:
xxxxxxxxxx
41RSolveValue[{
2 y[n] - 2 y[n - 1] + 26 y[n - 2] - 2 y[n - 3] + y[n - 4] == 0,
3 y[0] == 0, y[1] == 1, y[2] == 2, y[3] == -3
4}, y[n], n]
齐次通解为
设特解为
于是全解为
代入初值,得
齐次通解为
设特解为
于是全解为
代入初值,得
全解为
代入即可解得.
标答有误.