function BearingHz(D,d,a,Z,Fr)
%D为轴承节径，d为滚动体直径，a为接触角，角度，Z为滚动体数目,Fr为转速
%以美国凯斯西储大学6205-2RS JEM SKF深沟球轴承为例
D=39.0398;
d=7.94004;
a=0;%根据不同轴承类型而定
Z=9;
Fr=1797;
a=a/180*pi;%将角度转换为弧度
Fr=Fr/60;%将转速转换为转频
disp('内圈故障频率：Fic=')
Fic=Z*(1+d/D*cos(a))*Fr/2;
disp(Fic);
disp('外圈故障频率：Foc=')
Foc=Z*(1-d/D*cos(a))*Fr/2;
disp(Foc);
disp('滚动体故障频率：Fbc=')
Fbc=D*(1-(d/D*cos(a))^2)*Fr/d/2;
disp(Fbc);
disp('保持架故障频率：Fc=')
Fc=(1-d/D*cos(a))*Fr/2;
disp(Fc);
end
评论5