[解答] 滿滿的

[akwei (喂!)]

題目：

A:喂! 我說你......真的很無聊......

B:怎麼樣...我可是投注了滿滿的愛阿~!













===============解答在下一頁喔!!小心不要雷到!!==================================







解答：

x=linspace(-4, 4, 150);[x, y]=meshgrid(x, x);
z=zeros(100);zn=[];zr=[];xn=[];yn=[];
for i=1:150, for j=1:150,
if x(i, j)>0, z(i, j)=sin(x(i, j))+sin(abs(y(i, j)));
elseif x(i, j)<0, z(i, j)=3.1+x(i, j)-abs(y(i, j));end;
if z(i, j) >0, zn=[zn; 0.1*((x(i, j)^2+y(i, j)^2)^0.5)-0.46];
zr=[zr;0.46-0.1*((x(i, j)^2+y(i, j)^2)^0.5)];xn=[xn;x(i, j)];yn=[yn;y(i, j)];
end;end;end;
plot3(zr, yn, xn, 'r.', zn, yn, xn, 'r.', 3, 8, 8, 'y.', -3, -8, -8,'y.');
hold;



用matlab畫的3D的愛心~

可以旋轉喔~




出處、作者：
akwei

備註：
有matlab的可以直接跑跑看


===================注意解答的標題要跟題庫一樣喔！===============================

--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 220.132.89.186
推 kiluaagnes:跑不動(汗
→ aculirose:matlab 沒有耶~!?
推 sanloman:沒有  (攤)         再帶去實驗室跑跑看好了
→ akwei:耶?   真的假的?
推 kiluaagnes:我的電腦太爛了 等研究所考完要買新的
推 blackbelt:沒有matlab可以載octave擋著用XD
→ akwei:換個排法...可以了嗎??
發現一個隔行的問題...已修正
※ 編輯: akwei           來自: 220.132.89.186       (12/04 22:28)
→ ak472222:下次實習課開來看XD
推 solemnity:沒聽過　matlab可以吃嗎
→ akwei:可以