clc;clear all;close all;
%%% This code is written by Sobhan Bamdad in Policlinico
% to plot a free Bird by some mathematical equations from Hamid Naderi Yegane
fc_circle_plot = @(xs,ys,rs,varargin)...
arrayfun(@(x,y,r)plot(x,y,'o','MarkerSize',r,varargin{:}),xs,ys,rs,'UniformOutput',false);
k=-20000:1:20000;
x=(3*k/45000)+ sin((17*pi/20)*(k/20000).^5) .* (cos(41*pi*k/20000)).^6 +((1/3)* ((cos(41*pi*k/20000)).^16 ) +...
(1/3)* (cos(41*pi*k/20000)).^80) .* ((cos(pi*k/40000)).^12) .*(sin(6*pi*k/20000));
y=((15/30)*(k/20000).^4) - cos((17*pi/20)*(k/20000).^5).* ( (11/10)+(45/20)*((cos(pi*k/40000)).^8) ...
.*((cos(3*pi*k/40000)).^6) ) .* ((cos(41*pi*k/20000)).^6) + (12/20)*((cos(3*pi*k/200000)).^10).* ...
((cos(9*pi*k/200000)).^10) .* ((cos(18*pi*k/200000)).^10);
R=(1/2)+ (1/2)*((sin(41*pi*k/20000)).^2).* ((sin(9*pi*k/200000)).^2) + ...
(1/2)*((cos(41*pi*k/20000)).^2).*((cos(pi*k/40000)).^10) ;
figure;hold on;
fc_circle_plot(x,y,R,'Color','m','LineWidth',2);hold off;
引用格式
Sobhan Bamdad (2025). Bird plot by mathematical equation (https://www.mathworks.com/matlabcentral/fileexchange/177514-bird-plot-by-mathematical-equation), MATLAB Central File Exchange. 检索时间: .
MATLAB 版本兼容性
创建方式
R2024b
兼容任何版本
平台兼容性
Windows macOS Linux标签
Community Treasure Hunt
Find the treasures in MATLAB Central and discover how the community can help you!
Start Hunting!版本 | 已发布 | 发行说明 | |
---|---|---|---|
1.0.0 |