车轨耦合动力学外部激励——钢轨波磨

问题说明

在世界各国铁路上普遍存在的钢轨波浪形磨耗, 呈现在钢轨顶面的是一定间距的起伏不平的波浪状态,是典型的连续谐波激扰。另外,当车轮质心与几何中心偏离时, 也将给轮轨系统造成周期性简谐波激扰。所有这些, 采用正(余) 弦函数来描述是简单且合理的。

钢轨波磨模型

对于单一谐波激扰,可以简单地用余弦函数来描述其轨面外形,即
Z 0 ( t ) = 1 2 a [ 1 − c o s ( 2 π v L ) t ] Z_0(t)=\frac{1}{2}a[1-cos(\frac{2\pi v}{L})t] Z0(t)=21a[1cos(L2πv)t]
其中, t ∈ [ 0 , L v ] t\in [0, \frac{L}{v}] t[0,vL] L L L为不平顺波长, a a a为不平顺波深。
在这里插入图片描述对于多波激扰,上式中时间变量 t t t满足 t ∈ [ 0 , n L v ] t\in [0, \frac{nL}{v}] t[0,vnL]即可, n n n表示激扰波数, v v v表示车辆行驶速度。在多波激扰的情况下,由钢轨波磨导致的振动频率为 1 L / v \frac{1}{L/v} L/v1

Matlab代码说明

根据科学出版社出版的《车辆-轨道耦合动力学 (第四版)》建立完常规的轨道不平顺谱后,只需在轨道不平顺谱中的波磨位置添加以下语句即可。

% 钢轨波磨
 L = 60e-3;
 D = 0.04e-3;
 N = 1;
 t_corr = dt: dt: N*L/vcar0;

 D_list = ones(1, 520);
 N_total = length(D_list);
 Corr = [];
 for i = 1: N_total
     Corr = [Corr, D*D_list(i)*(1-cos(2*pi*vcar0*t_corr/L))];
 end
 Corr = Corr/max(D_list);
 N_list = [length(Corr)];
 TC_list = [0.5];
 f = vcar0/L;

 kk = 0;
 count = 0;
 for tt = dt: dt: ttt
 
     kk = kk + 1;
     if ismember(floor(tt/dt), floor(TC_list/dt))
         T_index = floor(tt/dt);
         count = count + 1;
         Zr(kk)=Zr(kk)+Corr(floor(tt/dt)-T_index+1);
     elseif exist('T_index')
         if ismember(floor(tt/dt), T_index:(T_index+length(Corr)-1))
             Zr(kk)=Zr(kk)+Corr(mod(floor(tt/dt)-T_index, length(Corr))+1);
         end
     end
     
 end
 clear T_index

参考资料

1、车辆-轨道耦合动力学(第四版)

翟婉明的二维车轨耦合模型是一种用于描述车辆行驶在曲线道路上的模型。以下是该模型的MATLAB代码示例: ``` % 定义常数 mass = 1500; % 车辆质量 g = 9.8; % 重力加速度 l = 2.9; % 车辆轴距 kf = 30000; % 前轮侧向刚度 kr = 30000; % 后轮侧向刚度 % 轨迹函数 function [x, y] = trajectory(t) % 在这里定义车辆行驶轨迹 % 返回轨迹上的坐标 (x, y) % 根据时间t计算车辆在轨迹上的位置 end % 求解微分方程(车辆运动方程) function dxdt = vehicleMotion(t, x) % x是状态向量,包含车辆的位置、速度、横摆角等信息 % 在这里计算车辆的运动微分方程 % 返回车辆状态的导数 dx/dt end % 仿真计算车辆运动 tspan = [0 10]; % 仿真时间范围 x0 = [0 0 0 0]; % 初始状态,位置、速度、横摆角 [t, x] = ode45(@vehicleMotion, tspan, x0); % 使用ode45求解微分方程 % 绘制车辆运动轨迹 for i=1:length(t) [p1x, p1y] = trajectory(t(i)); % 获取当前时间车辆的轨迹坐标 p2x = p1x + l*sin(x(i,3)); % 计算车辆后轮位置 p2y = p1y - l*cos(x(i,3)); plot([p1x p2x], [p1y p2y], 'b-', 'LineWidth', 2); % 绘制车辆轨迹 hold on; end title('车辆运动轨迹'); xlabel('位置X'); ylabel('位置Y'); ``` 以上是翟婉明的二维车轨耦合模型的一份MATLAB代码示例。这段代码定义了车辆模型的常数和轨迹函数,并使用ode45求解了车辆运动的微分方程。最后,通过绘图函数plot将车辆运动的轨迹绘制出来。具体的轨迹函数和车辆运动微分方程需要根据具体情况进行定义和计算。
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

cofisher

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付:¥1
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值