MATLAB的画家之旅

1、前言：

一直流传着这样一个说法：‘MATLAB除了不能生孩子，什么都能干！’这话一点不假。以下是出于无聊在网上收集的部分有意思的基于MATLAB的画画--数据或函数处理。部分参看网址和代码贴出，如有侵权请告知！

2、1）画火柴人：http://www.doc88.com/p-9187405163802.html

2）画的“百花争艳图”：http://www.ilovematlab.cn/thread-118987-1-1.html

3）画自行车：http://www.ilovematlab.cn/thread-116258-1-1.html

4）烟花动画：http://www.matlabsky.com/forum.php?mod=viewthread&tid=18210谢中华老师作品。

5）地球仪图形：https://jingyan.baidu.com/article/ed2a5d1f3f0dd309f7be177c.html

6）画卡通猫：https://blog.csdn.net/m970808m/article/details/72763544

7）画爱心：https://blog.csdn.net/rs_network/article/details/8048895，

https://jingyan.baidu.com/article/ca2d939d2e79aeeb6c31ce82.html

https://blog.csdn.net/u013346007/article/details/55222642/

https://blog.csdn.net/lpsl1882/article/details/50806694

http://www.ilovematlab.cn/forum.php?mod=viewthread&tid=303845

8）画橙子：https://www.bilibili.com/video/av28516816?from=search&seid=3585406027173714696

9）Excel人的插画：https://www.bilibili.com/video/av28790093?from=search&seid=3585406027173714696

10）画玫瑰花：https://blog.csdn.net/newcloudtech/article/details/8684618

代码：

function plot_rose
draw_main(450,90);
function draw_main(x,y)
%粉红色玫瑰
arcdata{1}=[65 -60 150 350 866 -54 300 470 865 -56 30 230 1064 -57 300 490 17];
ellipsedata{1}=[73 -30 250 450 27 4059 -30 100 290 27 4065  -40 140 270 20 30];
arcdata{2}=[0 0 150 350 121 8 280 470 120 2 30 230 160 3 80 240 282 8 180 330 22-2 2 310 460 25];
ellipsedata{2}=[-12 30 120 300 30 4010 28 250 423 30 42-4  10 290 393 30 40];
ellipsedata{3}=[120 5 0 360 15 25];
ellipsedata{4}=[-70 10 0 360 14 20];
rose_e{2}=[x+16 y+32 235 355 26 35x-15 y+32 190 310 30 35x+0 y+35 190 350 43 50];
rose_e{1}=[x+80 y-48 220 350 22 50x+50 y-48 190 320 22 50x+65 y-28 180 360 36 50];
rose_e{3}=[x+120 y-6 200 340 17 25x+120 y+7 160 380 17 27];
rose_e{4}=[x-70 y+15 140 390 17 20x-75 y-10 205 340 10 30x-60 y-10 195 340 5 30];
arcdata{3}=[0 82 190 350 6];
ss={'m','r','b','y'};
s0={'k','k','g'};
figure('menubar','none','numbertitle','off','name','rose');
% figure('numbertitle','off','name','rose');
hold on
for j=1:length(ellipsedata)for i=1:size(ellipsedata{j},1)rectangle('Position',[x+ellipsedata{j}(i,1)-ellipsedata{j}(i,5),y+ellipsedata{j}(i,2)-ellipsedata{j}(i,6),2*ellipsedata{j}(i,5),2*ellipsedata{j}(i,6)],'Curvature',[1,1],...'FaceColor',ss{j})endif j<4for i=1:size(arcdata{j},1)draw_arc(x+arcdata{j}(i,1),y+arcdata{j}(i,2),arcdata{j}(i,3),arcdata{j}(i,4),arcdata{j}(i,5),s0{j});endendfor i=1:size(rose_e{j},1)plot_rose_e(rose_e{j},j);end
end
for j=1:3zhuzhi=[x-98,y+100+j,255,371,100,80x-20,y+30+j,260,358,140,140x+224,y+20+j,180,218,160,140];draw_branch(zhuzhi);
end
ce_branch=[x+70,y+34,180,233,140,140; x,y+40,205,255,100,120; x+135,y-30,209,249,72,120; x,y+20,263,301,100,120; x+85,y-10,278,305,100,120; x+100,y-62,282,308,90,120; x-50,y-10,277,314,30,120; x+70,y+80,222,266,52,120; x-60,y-45,229,266,52,120; x+79,y-45,229,266,52,120; x+84,y,224,273,52,120; x+110,y+40,240,282,100,120];
draw_branch(ce_branch);
t_leaf=[x+168,y+282,10,20,-40; x+160,y+252,8,16,260; x+145,y+270,8,16,-15; x+156,y+224,10,20,-45; x+150,y+200,8,16,270; x+135,y+220,8,16,-10; x+146,y+144,8,16,-80; x+130,y+130,6,12,235; x+125,y+154,7,14,-10; x+78,y+98,6,12,-90; x+60,y+90,5,10,180; x+70,y+109,5,10,-45;x-125,y+270,12,24,60; x-95,y+270,10,20,10; x-110,y+245,10,20,90; x-105,y+220,10,20,45; x-100,y+190,8,16,135; x-75,y+210,8,16,-45; x+65,y+190,10,20,-45; x+40,y+185,8,16,0; x+55,y+165,8,16,90];
for j=1:size(t_leaf,1)draw_elli(t_leaf(j,1),t_leaf(j,2),t_leaf(j,3),t_leaf(j,4),t_leaf(j,5));
end
axis ij
axis off
set(gcf,'color','k');
daspect([1,1,1])% 画旋转椭圆
function draw_elli(x0,y0,a,b,theta)
theta=-theta;
t = 0:0.01:2*pi;
x =  a*cos(t);
y =  b*sin(t);
xy = zeros(2,length(t));
for i = 1:length(t)xy(:,i) = expm([0,-pi/180*theta;pi/180*theta,0])*[x(i);y(i)];
end
plot(x0 +xy(1,:),480-y0 + xy(2,:),'g');
% 画弧线
function draw_arc(x0,y0,st_a,en_a,r,c_c)
t = (pi/180*st_a:0.01:pi/180*en_a)-pi;
x = x0 + r*cos(t);
y = y0 + r*sin(t);
plot(x,y,c_c);
% 花萼
function plot_rose_e(matr,ch)
x=[];y=[];n=size(matr,1);
for i=1:size(matr,1)t=(matr(i,3):matr(i,4))*pi/180-pi;x1=matr(i,1)+matr(i,5)*cos(t);y1=matr(i,2)+matr(i,6)*sin(t);if i<3x1=2*matr(i,1)-x1;endx1=fliplr(x1);y1=fliplr(y1);if n<3 && i<2x1=fliplr(x1);y1=fliplr(y1);endif ch==4 && i==2x1=fliplr(x1);y1=fliplr(y1);endx=[x,x1];y=[y,y1];
end
fill(x,y,'g');
% 画树枝
function draw_branch(zhuzhi)
for k=1:size(zhuzhi,1)t=(zhuzhi(k,3):zhuzhi(k,4))*pi/180-pi;x1=zhuzhi(k,1)+zhuzhi(k,5)*cos(t);y1=zhuzhi(k,2)+zhuzhi(k,6)*sin(t);x1=2*zhuzhi(k,1)-x1;plot(x1,y1,'g','linewidth',2);
end

3、最后自己简单的写了个MATLAB code 的GUI，就是直接按钮回调别人的代码，十分粗糙大神勿笑。效果如下

MATLAB的画家之旅相关推荐

利用Matlab优化工具箱求解旅行商最短路径问题
前面介绍了利用Matlab二元整数规划求解数独问题,对于另一个问题-旅行商问题也可以用它来求解. 旅行商问题就是找到经过所有站点的最短闭合路径,如下图为在美国地图框架内产生的200个旅行站点,而旅行商 ...
matlab中结束脚本运行_疫情当前，生活向前 | MATLAB 一直 Online 等你
疫情当前,生活向前,希望如期而至的不止是春天,还有疫情过后平安而充实的你 ! MATLAB 连夜帮你整理了我们所有网上的学习资源,为了注定不平凡的你. ◆ ◆ ◆ 三大工具,在家开学也不怕[1 ...
MATLAB实战系列（十九）-遗传算法解决TSP（旅行商）问题-应用及解析（文末附MATLAB源码）
接上篇MATLAB实战系列(十八)-遗传算法解决TSP(旅行商)问题-算法原理 https://wenyusuran.blog.csdn.net/article/details/114060030 感 ...
matlab入门之旅,MATLAB 入门之旅学习笔记
MATLAB 入门之旅学习笔记 https://matlabacademy.mathworks.com/R2019a/cn/portal.html?course=gettingstarted 1.概述 ...
matlab算法大全 pdf_遗传模拟退火算法求解旅行商（TSP）问题
hello大家好,很高兴又和大家见面了.在之前的遗传算法(GA)求解旅行商问题(TSP)MATLAB代码讲解和模拟退火(SA)算法求解旅行商 (TSP)问题MATLAB代码讲解这两篇推文中,分别讲解了 ...
MATLAB深度学习入门之旅
目录 1. 简介 2. 使用预训练网络:使用已创建和训练后的网络进行分类 2.1 课程示例-识别一些图像中的对象 2.1.1 任务1:读取图像 2.1.2 任务2:显示图像 2.2 进行预测 2. ...
Matlab.m文件生成.exe文件之旅
Matlab.m文件生成.exe文件之旅 Matlab中.m文件生成.exe文件之旅作为算法工程师,有时需要测试人员帮忙测试算法模型,故需要向其发布一个算法工具,也是就是.exe文件.由于近期有利用 ...
matlab解决多旅游商问题,多旅行商问题的matlab程序
%多旅行商问题的matlab程序 function varargout = mtspf_ga(xy,dmat,salesmen,min_tour,pop_size,num_iter,show_prog ...
MATLAB实战系列（十八）-遗传算法解决TSP（旅行商）问题-算法原理
感兴趣的小伙伴可以参考下博主的资源列表 MATLAB源码集锦-蚁群算法求解TSP问题matlab代码 https://download.csdn.net/download/wenyusuran/152 ...

MATLAB的画家之旅

MATLAB的画家之旅相关推荐

最新文章

热门文章