run2.m

hilbert时频识别（力学领域）Michael feldman编写（自由振动、强迫振动）

m2 = menu('Choose a System',...
'Linear',...
'Duffing',...
'Backlash + Dry friction',...
'Back to the "Signal"',...
'Quit & Close');

if     m2==1, eval(['load      linfo' stype '.mat;']); clc; eval(['[y1,A,f,f0,h,ph,m]=' pn '(x,y,1000,200,stype);']); run2;
elseif m2==2, eval(['load      duffo' stype '.mat;']); clc; eval(['[y1,A,f,f0,h,ph,m]=' pn '(x,y,1000,200,stype);']); run2;
elseif m2==3, eval(['load dry_backfo' stype '.mat;']); clc; eval(['[y1,A,f,f0,h,ph,m]=' pn '(x,y,1000,200,stype);']); run2;
elseif m2==4, run;
elseif m2==5, close all; return;
end