rscale.m

来自「此文件是本人的毕业设计所做」· M 代码 · 共 11 行

% ———— rscale.m ————
% 求取输入输出匹配系数
function[Nbar] = rscale(A,B,C,D,K) 
s = size(A,1);
Z = [zeros([1,s]) 1];
N = inv([A,B;C,D])*Z';
Nx = N(1:s);
Nu = N(1+s);
Nbar = Nu + K*Nx;
% —————— end ——————