自行车轮装饰物的运动轨迹
{问题1}
为了使平淡的自行车增添一份美感,同时,也为了增加自行车的安全系数,一些骑自行车的人及自行车厂家在自行车的辐条上安装一款亮丽夺目的饰物。当有这种饰物的自行车在马路上驶过时,这种饰物就像游龙一样,对街边的行人闪过一道波浪形的轨迹。
(1)当自行车在平地上运动时。这个轨迹是什么曲线?试画其图形。
(2)当自行车在斜坡上运动时。这个轨迹是什么曲线?试画其图形。
(3)当自行车在一个抛物线型的拱桥上通过时。这个轨迹是什么曲线?试画其图形。
(4)当自行车在一拱一拱的正弦曲线上通过时,这个轨迹是什么曲线?试画其图形。
[数学模型]
假设路面曲线是y  = f (x ),自行车在运动过程中,车轮在路面上作无滑动的滚动,与路面只有一个接触点。车轮可当作一个半径为R 的圆,运动时与地面相切。饰物P 离圆心的距离为r 。如A1图所示,CP 与
圆相交于A ,A 是初始接触点。当圆滚过θ角之后,接触点移到A'处,圆从C 移到C'处,饰物从P 移到P'处。
曲线弧元为
d s x x ===
设A'点的坐标为(x 0,y 0),则有弧长关系
0x R x θ=⎰                            (1)
设圆心C'的坐标为(x C ,y C ),C'在曲线的法线上,因此联立方程
0001()()()C C y f x x x f x -=--' 22200()[()]C C x x f x y R -+-=
解得圆心坐标
0C x x R =
(2) 0()C y f x R =      (3)
设P'的坐标为(x ,y ),则
x  = x C  – r sin(θ - φ),y  = y C  + r cos(θ - φ)
其中θ是圆心角,φ是法线与竖直方向的夹角,也是切线与水平方向的夹角,称为仰角。由
(1)式可得圆心角
001x x R
θ=⎰                        (4)
根据导数的定义可得仰角
A1图
φ = arctan[f '(x 0)]                            (5)
饰物的轨迹方程为
0sin()sin()C x x r x R r θϕθϕ'=--=--
(6a) 0cos()()cos()C y y r f x R r θϕθϕ=--=--        (6b)
[解析](1)设y  = 0,路面是一条直线,则f '(x ) = 0,φ = 0,θ = x 0/R ,饰物的轨迹方程为
x  = x 0 – r sin(x 0/R ),y  = R  – r cos(x 0/R )                    (7a)
x  = R θ – r sin θ,y  = R  – r cos θ                        (7b)
当r  < R 时,上式是短摆线方程;如果r  = R ,上式就是典型的摆线方程。
[算法](1)取R 为长度单位,则短摆线方程可化为
x * = θ – r *sin θ,y * = 1 – r *cos θ                        (7*)
其中x * = x /R ,y * = y /R ,r * = r /R 。θ是自变量,r *是可调节的参数。
[图示](1)如M1_1_1a 图所示,当r  < R 时,短摆线处处光滑。如M1_1_1b 图所示,当r  = R 时,摆线在
x /R  = 2n π处出现尖点。如M1_1_1c 图所示,当r  > R 时,即:饰物在车轮之外(例如火车车轮边缘的情况),摆线在x /R  = 2n π附近出现回旋。
M1_1_1a 图                            M1_1_1b 图
[程序]zqy1_1_1bicycle.m
%摆线的轨迹
clear                                  %清除变量
r=input('请输入半径r/R:');            %键盘输入半径比
th=linspace(0,2*2*pi,1000);            %参数向量
x=th-r*sin(th);                        %横坐标向量
y=1-r*cos(th);                        %纵坐标向量
figure                                %建立图形窗口
plot([0,th(end)],[0,0])                %画横线
hold on                                %保持图像
plot(x,y)                              %画摆线
axis equal                              %使坐标间隔相等
grid on                                %加网格
fs=16;                                %字体大小
title('摆线的轨迹','FontSize',fs)      %显示标题
xlabel('\itx/R','FontSize',fs)        %x 标签
ylabel('\ity/R','FontSize',fs)        %y 标签
text(0,0,['\itr/R\rm=',num2str(r)],'FontSize',fs)%显示字符串
M1_1_1c 图                            M1_1_2图
[程序]zqy1_1_2bicycle.m
%摆线的轨迹族
clear                                  %清除变量
r=[0.5,1,1.5];                        %半径比向量
th=linspace(0,2*2*pi,1000);            %参数向量
[R,TH]=meshgrid(r,th);                %化为矩阵
X=TH-R.*sin(TH);                      %横坐标向量
Y=1-R.*cos(TH);                        %纵坐标向量
figure                                %建立图形窗口
plot(X,Y)                              %画摆线
axis equal                              %使坐标间隔相等
grid on                                %加网格
fs=16;                                %字体大小
title('自行车轮饰物的摆线族','FontSize',fs)%显示标题
xlabel('\itx/R','FontSize',fs)        %x 标签
ylabel('\ity/R','FontSize',fs)        %y 标签
legend([repmat('\itr/R\rm=',length(r),1),num2str(r')])%显示图例
hold on                                %保持图像
plot([0,th(end)],[0,0])                %画横线
[解析](2)设f (x ) = kx ,路面是一个斜坡,k 是斜坡的斜率,则f '(x ) = k 。设k  = tan α,α是斜坡的角度,可得
φ = arctan(k ) = α
(8)
00001cos x x x R R θα
===⎰                (9) 饰物的轨迹方程为
x  = x 0 – R sin α - r sin(θ – α),y  = x 0tan α + R cos α – r cos(θ – α)            (10)
当α = 0时,斜坡变成平地,由上式可得(7)中两式。
[算法](2)取R 为长度单位,则饰物的方程可化为
x * = x 0* – sin α - r *sin(θ – α),y * = x 0*tan α + cos α – r *
cos(θ – α)            (10*)
其中x 0* = x 0/R ,y 0* = y 0/R 。圆心角可表示为
*0cos x θα=                              (9*) x 0*是自变量,r *和α是可调节的参数。
[程序]zqy1_2bicycle.m
%自行车沿着斜坡运动时饰物的轨迹
clear                                  %清除变量
r=input('请输入相对半径r/R:');        %键盘输入相对半径
alpha=input('请输入斜坡的度数alpha:');  %键盘输入角度
a=alpha*pi/180;                        %化为弧度
x0=0:0.001:20;                        %自变量向量
y0=x0*tan(a);                          %坡度的纵坐标
th=x0/cos(a);                          %参数向量
x=x0-sin(a)-r*sin(th-a);              %横坐标向量
y=y0+cos(a)-r*cos(th-a);              %纵坐标向量
figure                                %建立图形窗口
plot(x0,y0)                            %画斜坡
hold on                                %保持图像
plot(x,y)                              %画轨迹
axis equal                              %使坐标间隔相等
grid on                                %加网格
fs=16;                                %字体大小
title('自行车轮饰物在斜坡上的轨迹','FontSize',fs)%显示标题
xlabel('\itx/R','FontSize',fs)        %x 标签
ylabel('\ity/R','FontSize',fs)        %y 标签
txt=['\itr/R\rm=',num2str(r),',\it\alpha\rm=',num2str(alpha),'\circ'];%字符串 text(0,0,txt,'FontSize',fs)            %显示字符串
M1_2a 图                            M1_2b 图
[图示](2)如M1_2a 图所示,当α > 0时,自行车上坡。如M1_2b 图所示,当α < 0时,自行车下坡。
[解析](3)抛物线的标准方程为
f (x ) = x 2
/2p                                (11)
路面是一条抛物线,p 是抛物线的准焦距。由于f '(x ) = x /p ,因此仰角为
φ = arctan(x 0/p )                              (12) 圆心角为
00/00
1
x x p
x y R R θ==⎰⎰ 根据积分公式可得
0ln[2x p
R p θ=+
(13) 饰物的轨迹方程为
0sin()x x r θϕ=--
(14a) 2
cos()2x y R r p θϕ=+--
(14b) [算法](3)取R 为长度单位,则抛物线方程可化为
y 0* = x 0*2/2p *
(11*) 其中p * = p /R ,x 0* = x 0/R ,y 0* = y 0/R 。
饰物的方程可化为
*
*
***
0sin()x x r
θϕ=--
(14a*) *2
**0
*cos()2x y r p θϕ=---
(14b*) 仰角为
φ = arctan(x 0*/p *)
(12*) 圆心角为
*
字符串长度公式*
0*ln[2x p p θ=+
(13*) x 0*是自变量,r *和p *是可调节的参数。
[程序]zqy1_3bicycle.m 如下。
%自行车沿着抛物线运动时饰物的轨迹
clear                                  %清除变量
r=input('请输入相对半径r/R:');        %键盘输入相对半径 p=input('请输入相对准焦距p/R:');      %键盘输入相对准焦距 x0=-20:0.001:20;                      %自变量向量
xx0=x0/p;                              %中间变量
y0=x0.*xx0/2;                          %抛物线纵坐标

版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。