詳解Matlab實(shí)現(xiàn)動(dòng)態(tài)表白圖的繪制

第詳解Matlab實(shí)現(xiàn)動(dòng)態(tài)表白圖的繪制目錄1.幸福和快樂(lè)的哲學(xué)追問(wèn)2.提前祝女朋友節(jié)日快樂(lè)2.1展現(xiàn)2.2代碼

1.幸福和快樂(lè)的哲學(xué)追問(wèn)

在過(guò)去的500年間，我們見(jiàn)證了一連串令人驚嘆的革命。地球在生態(tài)和歷史上都已經(jīng)整合成一個(gè)單一的領(lǐng)域。經(jīng)濟(jì)呈現(xiàn)指數(shù)增長(zhǎng)，今日人類(lèi)所享有的財(cái)富在過(guò)去只有可能出現(xiàn)在童話(huà)里。而科學(xué)和工業(yè)革命也帶給我們超人類(lèi)的力量，以及幾乎可以說(shuō)無(wú)限的能源。不僅社會(huì)秩序完全改變，政治、日常生活和人類(lèi)心理也徹底改觀。

只不過(guò)，我們真的更快樂(lè)了嗎人類(lèi)在過(guò)去5世紀(jì)間積蓄的財(cái)富，是不是真的讓我們找到了新的滿(mǎn)足感有了取之不盡的能源之后，我們是不是也得到了用之不竭的快樂(lè)如果我們往更久之前回顧，認(rèn)知革命以來(lái)這動(dòng)蕩不安的7萬(wàn)年間，世界是不是真的變得更好﹖到現(xiàn)在，阿姆斯特朗的腳印還留在無(wú)風(fēng)的月球上，而3萬(wàn)年前也有個(gè)不知名的人，把手印留在雪維洞穴里;他們究竟誰(shuí)比較快樂(lè)如果后來(lái)的人并沒(méi)有比較快樂(lè)，我們又為什么要發(fā)展農(nóng)業(yè)、城市、文字、錢(qián)幣、帝國(guó)、科學(xué)和工業(yè)呢

歷史學(xué)家很少問(wèn)這樣的問(wèn)題。他們不去討論秦朝人是不是比先前采集為生的人更快樂(lè)，伊斯蘭興起后，埃及人是不是對(duì)生活更滿(mǎn)意，也不討論歐洲帝國(guó)在非洲崩潰之后，數(shù)百萬(wàn)非洲人的幸福受到什么影響。然而，這些可以說(shuō)是最重要的歷史問(wèn)題。目前大多數(shù)的意識(shí)形態(tài)和政治綱領(lǐng)，雖然都說(shuō)要追求人類(lèi)幸福，但對(duì)于幸福快樂(lè)的真正來(lái)源為何卻還是不明就里。民族主義者會(huì)說(shuō)政治自決能夠帶來(lái)快樂(lè)。共產(chǎn)主義者會(huì)說(shuō)無(wú)產(chǎn)階級(jí)專(zhuān)政能夠帶來(lái)快樂(lè)。資本主義者會(huì)說(shuō)自由市場(chǎng)能夠創(chuàng)造經(jīng)濟(jì)成長(zhǎng)，能夠教導(dǎo)人類(lèi)自立自強(qiáng)、積極進(jìn)取，所以能夠?yàn)樽疃嗳藥?lái)最大的快樂(lè)。

如果經(jīng)過(guò)仔細(xì)研究，結(jié)果全盤(pán)推翻了這些人的假設(shè)，情況會(huì)如何﹖如果經(jīng)濟(jì)成長(zhǎng)和自立自強(qiáng)并不會(huì)讓人更快樂(lè)，又何必將資本主義奉如圭臬【指尊崇信奉某人或事物，并且作為自己的準(zhǔn)則。】如果研究顯示大型帝國(guó)的屬民通常比獨(dú)立國(guó)家的公民更幸福，例如假設(shè)阿爾及利亞人被法國(guó)統(tǒng)治時(shí)比較快樂(lè)，那我們?cè)撛趺崔k這樣一來(lái)，要怎樣評(píng)價(jià)去殖民化，民族自決的價(jià)值又該怎么說(shuō)

2.提前祝女朋友節(jié)日快樂(lè)

2.1展現(xiàn)

這里沒(méi)上傳視頻圖，放最后一張成品：

2.2代碼

漂亮的顏色隨你挑：

clear

%%構(gòu)造體積方程和坐標(biāo)軸

[X,Y,Z]=meshgrid(linspace(-3,3,101));

%%3D心型圖方程

F=-X.^2.*Z.^3-(9/80).*Y.^2.*Z.^3+(X.^2+(9/4).*Y.^2+Z.^2-1).^3;

%%展開(kāi)畫(huà)布

hFigure=figure;

sz=get(hFigure,'Position');

set(hFigure,'Position',[sz(1)-0.15*sz(3)sz(2)1.3*sz(3)sz(4)]);%設(shè)置畫(huà)布大小

set(hFigure,'color','w','menu','none')%隱藏菜單，顏色做白

hAxes=axes('Parent',hFigure,...

'DataAspectRatio',[111],...

'XLim',[30120],'YLim',[3565],'ZLim',[3075]);

view([-3930]);%視角

axisoff%關(guān)閉坐標(biāo)軸

%hiddenon

%%制作出動(dòng)態(tài)的隱形效果

p=patch(isosurface(F,0));

set(p,'FaceColor','none','EdgeColor','none');%心形線(xiàn)和面隱藏

alpha(0);%使其為0透明度以便顯示文字

text(45,50,60,'WLZ','fontweight','bold','fontsize',25,'color','m');%顯示出文字

pause(2)

holdon

%%描出Y-Z平面的心形輪廓

foriX=35:1:67

plane=reshape(F(:,iX,:),101,101);

cData=contourc(plane,[00]);

xData=iX.*ones(1,cData(2,1));

plot3(hAxes,xData,cData(2,2:end),cData(1,2:end),'r');

pause(0.1),drawnow

%%描出X-Z平面的心形輪廓

foriY=41:2:61

plane=reshape(F(iY,:,:),101,101);

cData=contourc(plane,[00]);

yData=iY.*ones(1,cData(2,1));

plot3(hAxes,cData(2,2:end),yData,cData(1,2:end),'r');

pause(.5),drawnow

%%描出X-Y平面的心形輪廓

foriZ=36:1:71

plane=F(:,:,iZ);

cData=contourc(plane,[00]);

startIndex=1;

ifsize(cData,2)(cData(2,1)+1)

startIndex=cData(2,1)+2;

zData=iZ.*ones(1,cData(2,1));

plot3(hAxes,cData(1,2:(startIndex-1)),...

cData(2,2:(startIndex-1)),zData,'r');

zData=iZ.*ones(1,cData(2,startIndex));

plot3(hAxes,cData(1,(startIndex+1):end),...

cData(2,(startIndex+1):end),zData,'r');

pause(.1),drawnow

%%給三維心著色補(bǔ)光

alpha(1)%恢復(fù)透明度

set(p,'facecolor','m','edgecolor','none');

camlight%補(bǔ)光

lightinggouraud

pause(.2)

line([2080],[5050],[52.52.5],'color','r')

line([5050],[2080],[52.552.5],'color','r')

line([5050],[5050],[3080],'color','r')

pause(0.5)

%文字部分;

text(0,50,107,'好好疼你，陪你長(zhǎng)大\heartsuit','fontweight','bold','fontsize',25,'color','r');

pause(2)

text(7,100,70,['WLZ\heartsuit'],'fontWeight','bold','FontAngle','italic','FontName','TrebuchetMS','fontsize',45,'Color','c');

pause(.5)

text(80,50,43,'YOU','fontWeight','bold','FontAngle','italic','FontName','TrebuchetMS','fontsize',60,'Color','k');

pause(.2)

text(75,5,40,'超級(jí)愛(ài)你\heartsuit','fontWeight','bold','FontAngle','italic','FontName','TrebuchetMS','fontsize',20,'Color','g');

pause(.2)

text(120,0,20,'xys\heartsuit','fontWeight','bold','FontAngle','italic','FontName','TrebuchetMS','fontsize',10,'Color','r');

pause(.2)

uicontrol(hFigure,'Style','Edit','Units','normalized','Position',[0,0.8,1,0.12],...

'Backgroundcolor','[0,1,1]','String','520快樂(lè)','Fontsize',40,'Foregroundcolor','[1,0,1]');

pause(.5)

uicontrol(hFigure,'Style','Edit','Units','normalized','Position',[0,0.8,1,0.12],...

'Backgroundcolor','[0.3,0.75,0.93]','String','520快樂(lè)','Fontsize',40,'Foregroundcolor','[1,0,1]');

pause(.5)

uicontrol(hFigure,'Style','Edit','Units','normalized','Position',[0,0.8,1,0.12],...

'Backgroundcolor','[1,0.5,0]','String','520快樂(lè)','Fontsize',40,'Foregroundcolor','[1,0,1]');

pause(.5)

uicontrol(hFigure,'Style','Edit','Units','normalized','Position',[0,0.8,1,0.12],...

'Backgroundcolor','[1,1,1]','String','520快樂(lè)','Fontsize',40,'Fore