【好玩的源碼】兒童節(jié)快樂！送你一只可愛的小豬佩琪

硬件電子工程師

點擊上方藍字和“好玩的MATLAB”一起快樂玩耍吧！


9 f4 O+ |, x- t9 L6 p% W% Z1 n好玩的matlab
帶你解鎖不一樣的matlab新玩法
3 s% t9 ~6 c4 x9 i
小豬佩琪對于小學生來說可能有點幼稚，但是對于大學生來說剛剛好，今天六一兒童節(jié)，小編用MATLAB繪制可愛的小豬佩琪送給大家，喜歡此推文的小伙伴們記得點贊+關注+分享！

, f/ ]6 k7 G+ a效果圖

6 t! E* I, k$ P  R. q* \$ [- E
, [1 g6 f+ M  c9 e
5 S7 ]) r  ^4 K2 Q2 u





5 X7 h6 W' t( Q2 r- J$ r程序分析


0 u4 \/ e4 Z( m# J$ d
7 o, M% v& F" i+ f! u繪制小豬佩琪圖像主要就是用許多橢圓、線條拼接而成的；為了方便繪制橢圓我自定義一個橢圓函數(shù)具體使用方法可以參考之前推文鏈接EllipseAndCircle函數(shù)
2 A1 e+ C% \! x$ b5 T) \/ B橢圓函數(shù)：

function XY=EllipseAndCircle(varargin)% author:2377389590@qq.com% EllipseAndCircle(a,b,x,y,Angle,Rotate,LineColor,LineWidth,PlotType,FillColor,Alpha)%                a、b ：為長短半徑%                x，y ：圓心坐標%                Angle ：開始/結束角度%                Rotate：旋轉角度%                LineColor：線條顏色%                LineWidth:線寬%                FillColor ：填充的顏色%                Alpha：透明度a=varargin{1};b=varargin{2};x=varargin{3};y=varargin{4};Angle=varargin{5};Rotate=varargin{6};LineColor=varargin{7};LineWidth=varargin{8};theta=Angle(1):pi/100:Angle(2);X=x+a*cos(theta); Y=y+b*sin(theta);XY=[X;Y]'*[cos(Rotate),-sin(Rotate);sin(Rotate),cos(Rotate)];if length(varargin)==8||strcmp(varargin{9},'plot' )    plot(XY(:,1),XY(:,2),'-','color',LineColor,'linewidth',LineWidth);    hold on; axis equalelseif length(varargin)==11||strcmp(varargin{9},'fill' )    try        FillColor=varargin{10};        Alpha=varargin{11};        fill(XY(:,1),XY(:,2),FillColor,'LineWidth',LineWidth,'FaceAlpha',Alpha,'edgecolor',LineColor)%         hold on; axis equal    catch        disp('參數(shù)輸入錯誤1')    endelse    disp('參數(shù)輸入錯誤2')endend“豬尾巴”曲線
8 U9 z9 l5 r$ G+ l為了找到合適的符合“豬尾巴”卷曲的曲線方程，小編把落灰的高數(shù)書翻了一遍，最后發(fā)現(xiàn)使用阿基米德螺旋線變形方式可以達到類似的效果

) D9 e5 j+ ?8 q+ j4 A% z

clc;clear;close alltheta = -5*pi:0.01*pi:5*pi;r =0.2*theta;x = r.*cos(theta);y = -r.*sin(theta);plot(x,y,'color','b','LineWidth',1.5)ax=gca;ax.TickDir='out';ax.XMinorTick='on';ax.YMinorTick='on';ax.FontSize=14;ax.LineWidth=1.5;ax.Box='off';
' ]" L" l. a; f
' B& p) M3 F- A$ o& Q- Q
9 l) g, ]/ W1 Y- k1 Q; h) s: X, ?


% M3 Z( W1 O) [' G完整代碼
+ V  `* R8 K( }% F


# @, L. T% q3 n/ \$ I【環(huán)境：matlab21b  收藏=學會】

clc;clear;close all;%======================================%  Author：好玩的MATLAB%  Email : 2377389590@qq.com%  Date  :2022-5-31%--------------------------------------ax=gca;ax.XLim=[-5 5];ax.YLim=[0 10];hold on;% ================豬尾巴==========================% 使用阿基米德螺旋線變形方式繪制theta = -pi:0.01*pi:pi;r =0.2*theta;x = r.*cos(theta);y = -r.*sin(theta);plot(x-2.6871,y+2.7277,'color',[0.98 0.68 0.87],'LineWidth',3)pause(0.5)%=================== 左手============================line([-3.2 -1.7],[3.5 4.3],'Color',[0.85 0.55 0.73],'LineStyle','-','LineWidth',5,'LineJoin','round')line([-3.3 -2.7],[3.9 3.8],'Color',[0.85 0.55 0.73],'LineStyle','-','LineWidth',5,'LineJoin','round')line([-3 -2.7],[3.2 3.8],'Color',[0.85 0.55 0.73],'LineStyle','-','LineWidth',5,'LineJoin','round')pause(0.5)% ===================右手=============================line([2.4 1.1],[3.3 4.3],'Color',[0.85 0.55 0.73],'LineStyle','-','LineWidth',5,'LineJoin','round')line([2 2],[3.53 3.1],'Color',[0.85 0.55 0.73],'LineStyle','-','LineWidth',5,'LineJoin','round')line([2 2.4],[3.5 3.7],'Color',[0.85 0.55 0.73],'LineStyle','-','LineWidth',5,'LineJoin','round')pause(0.5)% ===================左腿===============================line([-1.4448 -1.4686],[1.8487 0.9921],'Color',[0.85 0.55 0.73],'LineStyle','-','LineWidth',8,'LineJoin','round')pause(0.5)% ==================右腿==============================line([0.4349 0.4349],[1.85 1.0159],'Color',[0.85 0.55 0.73],'LineStyle','-','LineWidth',8,'LineJoin','round')pause(0.5)% ==================左腳===============================EllipseAndCircle(0.6,0.2,-1.1,1,[0,2*pi],0,[0 0 0],2,'fill',[0 0 0],1);pause(0.5)% ==================右腳==============================EllipseAndCircle(0.6,0.2,0.8,1,[0,2*pi],0,[0 0 0],2,'fill',[0 0 0],1);pause(0.5)%===================身體==============================EllipseAndCircle(2.35,5,-0.27,0.4,[0.3,2.861],0,[ 0.71 0.2 0.3],4,'fill',[1 0.35 0.37],1);pause(0.5)% ==================耳朵===============================EllipseAndCircle(0.4,0.63,2.5,8,[0,2*pi],-0.4,[0.85 0.55 0.73],3,'fill',[0.98 0.68 0.87],1);EllipseAndCircle(0.4,0.63,3.5,7,[0,2*pi],-0.7,[0.85 0.55 0.73],3,'fill',[0.98 0.68 0.87],1);pause(0.5)% =================頭和嘴巴=========================EllipseAndCircle(1.9,1.8,-0.27,6,[0,2*pi],0,[0.98 0.68 0.87],2,'fill',[0.98 0.68 0.87],1);EllipseAndCircle(0.8,0.6,1.8,5.5,[pi,2*pi],-0.3,[ 0.7 0.4 0.58],4,'fill',[0.98 0.68 0.87],1);%嘴巴EllipseAndCircle(1.3,2.4,-6.5,2.7,[0,2*pi],1.2,[0.98 0.68 0.87],2,'fill',[0.98 0.68 0.87],1);pause(0.5)% ==================鼻子=============================EllipseAndCircle(0.52,0.8,4.58,6.5,[0,2*pi],-0.37,[0.85 0.55 0.73],3,'fill',[0.98 0.68 0.87],1);EllipseAndCircle(0.1,0.1,1.67,7.67,[0,2*pi],0,[0.85 0.55 0.73],2,'fill',[0.85 0.55 0.73],1);EllipseAndCircle(0.1,0.1,2.1,7.8,[0,2*pi],0,[0.85 0.55 0.73],2,'fill',[0.85 0.55 0.73],1);% ==================眼睛=============================EllipseAndCircle(0.33,0.33,0.22,7.8,[0,2*pi],0,[0.85 0.55 0.73],2,'fill',[1 1 1],1);EllipseAndCircle(0.33,0.33,-0.6,7.4,[0,2*pi],0,[0.85 0.55 0.73],2,'fill',[1 1 1],1);EllipseAndCircle(0.1,0.1,-0.5,7.4,[0,2*pi],0,[0 0 0],2,'fill',[0 0 0],1);EllipseAndCircle(0.1,0.1,0.32,7.8,[0,2*pi],0,[0 0 0],2,'fill',[0 0 0],1);pause(0.5)% ==================腮紅==============================EllipseAndCircle(0.6,0.6,-1.4,6,[0,2*pi],0,[ 1 0.55 0.8],4,'fill',[1 0.55 0.8],1);
function XY=EllipseAndCircle(varargin)% author:2377389590@qq.com% EllipseAndCircle(a,b,x,y,Angle,Rotate,LineColor,LineWidth,PlotType,FillColor,Alpha)%                a、b ：為長短半徑%                x，y ：圓心坐標%                Angle ：開始/結束角度%                Rotate：旋轉角度%                LineColor：線條顏色%                LineWidth:線寬%                FillColor ：填充的顏色%                Alpha：透明度a=varargin{1};b=varargin{2};x=varargin{3};y=varargin{4};Angle=varargin{5};Rotate=varargin{6};LineColor=varargin{7};LineWidth=varargin{8};theta=Angle(1):pi/100:Angle(2);X=x+a*cos(theta); Y=y+b*sin(theta);XY=[X;Y]'*[cos(Rotate),-sin(Rotate);sin(Rotate),cos(Rotate)];if length(varargin)==8||strcmp(varargin{9},'plot' )    plot(XY(:,1),XY(:,2),'-','color',LineColor,'linewidth',LineWidth);elseif length(varargin)==11||strcmp(varargin{9},'fill' )    try        FillColor=varargin{10};        Alpha=varargin{11};        fill(XY(:,1),XY(:,2),FillColor,'LineWidth',LineWidth,'FaceAlpha',Alpha,'edgecolor',LineColor)    catch        disp('參數(shù)輸入錯誤1')    endelse    disp('參數(shù)輸入錯誤2')endend
5 _9 J- N1 H* e  E! f; B  d9 o
1 ^3 F  T. F% z$ P1 M# H
最后，祝大家六一兒童節(jié)快樂，沉迷學習無法自拔

: C: n  K" T  K
& |- [2 c: k0 L& A. Q- H, M1 v- w

/ W$ ?* Q# m: T+ D' G; C  Q  \1 W

- -THE END- -
源碼下載：gitee下載：https://gitee.com/iDMatlab/piggy-peggy/tree/master
8 G# A. X& _& @. I0 x+ w
" \3 X7 `9 i5 `. F7 a
  V9 a1 [, M6 ~: w. N8 S% \8 H( Y溫馨提示：如果出現(xiàn)404，可能原因是代碼還沒有審核通過。
' s, S/ @8 Q7 ], N) n1 H. `參考資料：
7 x* j, O! R) o) i【1】【好玩的源碼】MATLAB畫雪容融