运动学平抛小球地面跳跃规律matlab源码

Posted 2021-06-28 MatlabQQ1575304183

一、简介

通过平抛小球在地面上跳跃的规律说明无穷级数的应用。通过动画演示质点的运动轨迹。

二、源代码

%平抛小球在地面上跳跃的轨迹的主程序
clear                                  %清除变量
vx=0.1;                                %速率比
k=0.9;                                 %反弹系数
%平抛小球在地面上跳跃的轨迹的函数文件
function fun(vx,k)
if k>=1 return,end                     %如果速率比大于1则返回
tm=(1+k)/(1-k);                        %运动时间
xm=2*vx*tm;                            %最远距离
figure                                 %创建图形窗口
plot([0,xm],[0,0],'LineWidth',3)       %画地平线
grid on                                %加网格
axis equal                             %使坐标间隔相等
axis([0,xm,0,1])                       %坐标范围
fs=16;                                 %字体大小
title('平抛小球在地面上跳跃的轨迹','FontSize',fs)%标题
xlabel('水平距离\\itx/h','FontSize',fs) %横坐标标签
ylabel('竖直高度\\ity/h','FontSize',fs) %纵坐标标签
txt=['速率比\\itv_x/v\\rm_0:',num2str(vx)];%水平速率与平抛落地速率比文本
txt=[txt ',反弹系数:',num2str(k)];     %反弹系数文本
text(0,0.5,txt,'FontSize',fs)          %显示速率比文本
txt=['\\itT\\rm=',num2str((1+k)/(1-k)),'(2\\ith/g\\rm)^{1/2}'];%运动时间字符串
txt=[txt ',\\itX\\rm=',num2str(xm),'\\ith'];%连接运动距离
text(xm/4,0.8,txt,'FontSize',fs)       %显示运动时间

三、运行结果

四、备注

代码下载https://www.cnblogs.com/ttmatlab/p/14882966.html