matlab小程序.docx

或者百度空间里找搜索cuglizhen，百度空间（1）【cuglizhen】?[x,y]=meshgrid(-10:0.01:10);z=-(17*x.^2-16*y.*abs(x)+17.*y.^2);[c,h]=contourf(z,100);set(h,linestyle,none)（2）【FutureChao】??FutureChao???(UID: 299239) 给的【再66楼】?syms x;g=1/(x^2+2*x-3);ezplot(g,-10,10);（3）【cuglizhen】function Mclose allclearclc%%初始化Times=10; [x,y]=meshgrid(-10:0.02:10);%%for T=1:Times? ??? ? z=-(17*x.^2-16*y.*abs(x)+17.*y.^2).*T./5;? ? data{T}=z;end%? ???[c,h]=contourf(data,100);%? ???set(h,linestyle,none)%%%%%%%动画? ? figure(3);%? ???mesh(x,y,data{1});? ? view([0 90]);? ? hold on% set(h,linestyle,none)for i=1:Times%? ???view([0 90]);? ? mesh(x,y,data{i});? ? hold on% set(h,linestyle,none)? ? pause(0.1);? ? drawnow;? ??? ? MM(i)endhold offmsgbox(完成动画！！！,完成)function MM(i)? ???filename = xizh.gif;? ???f = getframe(gcf);??? ???imind = frame2im(f);? ? [imind,cm] = rgb2ind(imind,256);? ? if i==1? ?? ???imwrite(imind,cm,filename,gif, Loopcount,inf,DelayTime,0.05);%感觉时间太短改这个，但是储存就很卡? ? else? ?? ???imwrite(imind,cm,filename,gif,WriteMode,append,DelayTime,0.1);%感觉时间太短改这个，但是储存就很卡? ? end%?%?(4)【125楼的larlyii???(UID: 111796)】axis off;set(gcf, menubar, none, toolbar, none); % 不显示菜单栏和工具栏for k = 1 : 100? ? h = text(rand, rand, ...? ?? ???[\fontsize{,num2str(unifrnd(20, 50)),}\fontname{隶书} 囧], ...? ?? ???color, rand(1, 3), Rotation, 360 * rand);? ? pause(0.2);end【5】? ?【cuglizhen】刚才又写了一个！！！！！！！！上传不了图片过大【随机出现玫瑰图片的gif】步骤写好吧！1。网上下载不同的玫瑰花图片，尽量选小图片100*100的2.分别命名为1.jpg 2.jpg 。。。。。。。。。。。存到??rose.m相应路径下（我的是11个jpg文件）图片过多改我用*标记的行运行m文件。得到rose。giffunction roseclose allclearclcTimes=120;%%初始化h1=imread(1.jpg);h2=imread(2.jpg);h3=imread(3.jpg);h4=imread(4.jpg);h5=imread(5.jpg);h6=imread(6.jpg);h7=imread(7.jpg);h8=imread(8.jpg);h9=imread(9.jpg);h10=imread(10.jpg);h11=imread(11.jpg);%h12=imread(12.jpg); %**************一样加%%? ? figure();? ? axis off;%? ?? ?set (gcf,Position,[100,100,900,900])? ? set(gcf, menubar, none, toolbar, none); % 不显示菜单栏和工具栏? ? hold onfor i=1:Times? ? H=randi(11,1,1);%****************几个11就改几? ? if H==1? ?? ???H1=h1;? ? elseif H=