<p class="ql-block">MATLAB 幾行代碼繪制動態小水母</p><p class="ql-block">公式出自X站大佬 yuruyurau</p><p class="ql-block">根據公式改編的MATLAB代碼:</p><p class="ql-block">figure('Position',[300,50,900,900], 'Color','k');</p><p class="ql-block">axes(gcf, 'NextPlot','add', 'Position',[0,0,1,1], 'Color','k');</p><p class="ql-block">axis([0, 400, 0, 400])</p><p class="ql-block">SHdl = scatter([], [], 1, 'filled','o','w','MarkerEdgeColor','none', 'MarkerFaceAlpha',.4);</p><p class="ql-block">t = 0;</p><p class="ql-block">i = 0:1e4;</p><p class="ql-block">x = mod(i, 200);</p><p class="ql-block">y = i./55;</p><p class="ql-block">k = 9.*cos(x./8);</p><p class="ql-block">e = y./8 - 12.5;</p><p class="ql-block">while true</p><p class="ql-block">t = t + pi/120;</p><p class="ql-block">d = (k.^2 + e.^2)./99 + sin(t)./6 + .5;</p><p class="ql-block">q = 99 - e.*sin(atan2(k, e).*7)./d + k.*(3 + cos(d.^2 - t).*2);</p><p class="ql-block">c = d./2 + e./69 - t./16;</p><p class="ql-block">SHdl.XData = q.*sin(c) + 200;</p><p class="ql-block">SHdl.YData = (q + 19.*d).*cos(c) + 200;</p><p class="ql-block">drawnow;</p><p class="ql-block">end</p><p class="ql-block">%?#matlab? ?#數字藝術? ?#趣味編程? ?#數學建模</p>
主站蜘蛛池模板:
鹤山市|
房山区|
延安市|
泸定县|
舒城县|
遵义市|
塘沽区|
富锦市|
渝中区|
金平|
内乡县|
射洪县|
比如县|
康乐县|
女性|
林口县|
溧阳市|
安达市|
辽阳县|
和平区|
思茅市|
富蕴县|
秀山|
花莲市|
西城区|
庆城县|
龙陵县|
浦北县|
娄底市|
莆田市|
即墨市|
临邑县|
体育|
准格尔旗|
涿州市|
图木舒克市|
静安区|
五家渠市|
汕尾市|
同江市|
平利县|