代码搜索结果

%《MATLAB及其在理工课程中的应用指南》(十一五规划版）第五章例5-4-7程序 % 求微分方程的数值解 % 西安电子科技大学出版 陈怀琛著 2007年5月 clear, close all t0=0; tf=3*pi; x0=[0; 0]; % 给出初始值 [t,x]=ode23('exn547f',[t0,tf],x0); % 此处显示结果 y=x(:,1); %

%《MATLAB及其在理工课程中的应用指南》(十一五规划版)第八章例8－3－2动画改进程序b % 三相感应电机旋转磁场的形成（坐标系不更新并画出磁极） % 西安电子科技大学出版社出版 陈怀琛编著 2007年7月 % %感应电动机定子三相合成磁场矢量图 clear, clf, whitebg('w') I=10; freq = 50; w = 2*<mark>pi</mark>*freq; ...

%《MATLAB及其在理工课程中的应用指南》(十一五规划版)第八章例8－1－6程序 % 交流谐振电路 % 西安电子科技大学出版社出版 陈怀琛编著 2007年5月 % r1=2; r2=3; L1=0.75e-3; L2=0.25e-3; C=1000e-12;rs=28200; L=L1+L2;r=r1+r2;rse=rs*(L/L1)^2; % 折算内阻 f0=1/(2*pi*

%《MATLAB及其在理工课程中的应用指南》(十一五规划版)第五章例5-3-6程序 % 在[-<mark>pi</mark>,<mark>pi</mark>]区间内任意函数的傅立叶级数展开 % 西安电子科技大学出版社出版 陈怀琛编著 2007年7月 % clear,clf,format compact,format short x=linspace(-<mark>pi</mark>,<mark>pi</mark>,1001);dx=2*<mark>pi</mark>/1000;; % [-<mark>pi</mark>,<mark>pi</mark>]内长为10 ...

%《MATLAB及其在理工课程中的应用指南》(十一五规划版)第五章例5-2-1程序 % 单变量函数的极坐标绘图 % 西安电子科技大学出版社出版 陈怀琛编著 2007年7月 % clear,clf theta=0:0.1:2*<mark>pi</mark>; % 产生极角向量,这语句的缺点是在3.1到2*<mark>pi</mark>之间不能覆盖。 % 改进的方法是用 theta=linspace(0,2*<mark>pi</mark>,N);省略N时自动把0 ...

%《MATLAB及其在理工课程中的应用指南》(十一五规划版)第五章例5-1-5a程序 % 求无穷远处的极限 % 西安电子科技大学出版社出版 陈怀琛编著 2007年5月 % x1=linspace(-pi,pi,1001); plot(x1,exp(1./x1)./x1),grid on axis([-pi,pi,-2,10]),pause x1=[-0.0001,0,0.0001

%《MATLAB及其在理工课程中的应用指南》(十一五规划版）第五章例5-4-4程序 % 数值方法求回转体体积 % 西安电子科技大学出版社出版 陈怀琛编著 2007年7月 % clear,clf dx=input('dx= ') ;x=0:dx:pi; g=x.*sin(x).^2; plot(x,g),hold on fill([1.5,1.6,1.6,1.5,1.5],[0,0

%《MATLAB及其在理工课程中的应用指南》(十一五规划版）第五章例5-4-7程序 % 求微分方程的数值解 % 西安电子科技大学出版 陈怀琛著 2007年7月 % clear, close all t0=0; tf=3*pi; x0=[1; 0]; % 给出初始值 [t,x]=ode23('exn547bf',[t0,tf],x0); % 此处显示结果 y=x(:,1);plo

%《MATLAB及其在理工课程中的应用指南》(十一五规划版)第六章例6－2－4程序a % 碰撞的扩展（非正撞情况） % 西安电子科技大学出版社出版 陈怀琛编著 2007年7月 % 本程序不够完善，仅供参考 % clear K=100,logspace(-1,1,11); % 把K设成自变量数组, ur=zeros(9,2);vr=zeros(9,2);phi=zeros(9,2)

%《MATLAB及其在理工课程中的应用指南》(十一五规划版)第四章第七节演示程序a % 符号运算函数库演示程序 % 西安电子科技大学出版社出版 陈怀琛编著 2007年5月 % echo on disp('用符号工具箱表示及推导普通公式') syms x y t a u v w q,pause r = x^2 + y^2,pause theta = atan(y/x) ,pause