exn814.m

MATLAB及在电子信息课程中的应用.感觉很有用,本来也不花钱,有想用的来拿吧

%《MATLAB及其在理工课程中的应用指南》(十一五规划版)第八章例8－1－4程序
% 交流电路加多频信号
% 西安电子科技大学出版社出版  陈怀琛编著 2007年7月
%
clear, format compact
w=[eps,1,2];us=[10,10,0];Is=[5,0,5];
z1=1./(0.5*w*j);z2=[2,2,2];z3=[2,2,2];z4=1*w*j;
uoc=(z2./(z1+z2)-z4./(z3+z4)).*us;
zeq=z3.*z4./(z3+z4)+z1.*z2./(z1+z2);
u=Is.*zeq+uoc;
disp('       w       um       phi  ')
disp([w',abs(u'),angle(u')*180/pi])
set(gcf,'color','w')