绘制摆线

最新推荐文章于 2022-01-10 13:54:55 发布

转载最新推荐文章于 2022-01-10 13:54:55 发布 · 874 阅读

本程序演示了一个圆环沿固定圆周轨迹滚动时，圆环上特定点留下的轨迹。通过MATLAB代码实现了这一过程，并展示了从初始状态到最终轨迹形成的动画效果。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

摘要：一个圆环在一个圆周轨迹上滚动，本程序绘制其上一点在平面上
留下的轨迹。

程序：

% 实现一个圆在预定轨迹上滚动,圆上一定点留下的轨迹
clc;close all;clear;
axis([-4,4,-4,4]);hold on;
title('摆线的绘制');
% \copyright: zjliu
% Author's email: zjliu2001@163.com
set(gcf,'DoubleBuffer','on');
axis square;
tq=linspace(0,pi*2,200);
plot(2*exp(i*tq),'k');
z=-2;
xx=z+exp(i*tq)/4;
hc=plot(xx,'r');
hp=plot(real(xx(1)),imag(xx(1)),'b*');
ht=plot(real(xx(1)),imag(xx(1)),'b');   % 摆线
t=0;dt=0.02;
zk=[xx(1)];
omega=20; % 转速
while t<8;
    t=t+dt;
    dp=t*omega;
    z=2*exp(i*[pi*(1-t)]);
    xx=z+exp(i*(tq+dp))/4;
    zk=[zk,xx(1)];
    set(hc,'XData',real(xx),'YData',imag(xx));
    set(hp,'XData',real(xx(1)),'YData',imag(xx(1)));
    set(ht,'XData',real(zk),'YData',imag(zk));
    pause(0.1);
end