Exa19.m
上传用户:eighthdate
上传日期:2014-05-24
资源大小:270k
文件大小:1k
源码类别:

其他行业

开发平台:

Matlab

  1. t0= 0;   tfinal =15;              % time interval
  2. x0 = [0.5, 0];                    % initial conditions
  3. % [t,x] = ode23('electsys', t0, tfinal, x0);    % use with MATLAB 4
  4. tspan = [t0, tfinal];                           % use with MATLAB 5
  5. [t,x] = ode23('electsys', tspan, x0);           % use with MATLAB 5
  6. subplot(2,1,1),plot(t,x)
  7. title('Time response of an RLC series circuit')
  8. xlabel('t, sec')
  9. text(8,1.15,'Capacitor voltage')
  10. text(8, 0.1,'Current')
  11. vc= x(:,1);   i = x(:,2);
  12. subplot(2,1,2),plot(vc, i)
  13. title('Current versus capacitor voltage ')
  14. xlabel('Capacitor voltage')
  15. subplot(111)