2个回答
展开全部
%制作动画
%挂摆横梁
plot([-0.2;0.2],[0;0],'color','y','linestyle','-',...
'linewidth',10);
%画初始位置的单摆
g=0.98; %重力加速度,可以调节摆的摆速
l=1;
theta0=pi/4;
x0=l*sin(theta0);
y0=(-1)*l*cos(theta0);
axis([-0.75,0.75,-1.25,0]);
axis('off'); %不显示坐标轴
%创建摆锤
head=line(x0,y0,'color','r','linestyle','.',...
'erasemode','xor','markersize',40);
%创建摆杆
body=line([0;x0],[0;y0],'color','b','linestyle','-',...
'erasemode','xor');
%摆的运动
t=0;
dt=0.01;
while 1
t=t+dt;
theta=theta0*cos(sqrt(g/l)*t);
x=l*sin(theta);
y=(-1)*l*cos(theta);
set(head,'xdata',x,'ydata',y);
set(body,'xdata',[0;x],'ydata',[0;y]);
drawnow;
end
%挂摆横梁
plot([-0.2;0.2],[0;0],'color','y','linestyle','-',...
'linewidth',10);
%画初始位置的单摆
g=0.98; %重力加速度,可以调节摆的摆速
l=1;
theta0=pi/4;
x0=l*sin(theta0);
y0=(-1)*l*cos(theta0);
axis([-0.75,0.75,-1.25,0]);
axis('off'); %不显示坐标轴
%创建摆锤
head=line(x0,y0,'color','r','linestyle','.',...
'erasemode','xor','markersize',40);
%创建摆杆
body=line([0;x0],[0;y0],'color','b','linestyle','-',...
'erasemode','xor');
%摆的运动
t=0;
dt=0.01;
while 1
t=t+dt;
theta=theta0*cos(sqrt(g/l)*t);
x=l*sin(theta);
y=(-1)*l*cos(theta);
set(head,'xdata',x,'ydata',y);
set(body,'xdata',[0;x],'ydata',[0;y]);
drawnow;
end
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
深圳由你创科技
2024-05-28 广告
深圳市由你创科技有限公司专注于为高校、科研机构、行业头部企业提供深度、高效、高质、持续的matlab开发技术服务。服务内容：界面设计、编写回调函数、运行和调试、发布应用、算法集成全流程一站式服务。 在航空航天、新能源、新材料、工业自动化、科...
点击进入详情页
本回答由深圳由你创科技提供
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
