This commit is contained in:
2023-11-14 17:10:27 +08:00
commit d5a822831c
423 changed files with 5909 additions and 0 deletions

14
FOTF Toolbox/mfd2frd.m Normal file
View File

@ -0,0 +1,14 @@
function H=mfd2frd(H1,w)
% mfd2frd - conversion from MFD data type to FRD
%
% H=mfd2frd(H1,w)
%
% H1, w - the frequency response and frequency vector to be approximated
% H - the frequency response data in FRD format
% Copyright (c) Dingyu Xue, Northeastern University, China
% Last modified 28 March, 2017
% Last modified 18 May, 2022
[nr,~]=size(H1); nw=length(w); nr=nr/nw;
for i=1:nw, H(:,:,i)=H1((i-1)*nr+(1:nr),:); end, H=frd(H,w);
end