Codigo Matlab Factor de Seguridad A Flexion y Picadura
Codigo Matlab Factor de Seguridad A Flexion y Picadura
%%%%%%%%%%%%%%%
Yp = input('YP')
Yg = input('YG')
r = b/dp
%%%%%%%%%%%% cojinetes inmediatamnte adyacentes op=1 %%
%%%%%%%
%%%%%%%%%%%% cojinetes separados op=2 %%%%%%%%%
op = input('elije1adayacenteo2sepa')
if op == 1
Cpm = 1
elseif op == 2
Cpm = 1.1
else
Cpm = 0
end
Cma = input('Cma')
%%%%%%%%%%%%%contiuacion del desarrollo%%%%%%%%%%%%%
Kbetha = 1+(Cpf*Cpm+Cma)
KB = 1
YN = 1.3558*N^(-0.0178)
YNP = 1.3558*N^(-0.0178)
u = Ng/Np
YNG = 1.3558*(N/u)^(-0.0178)
%%%%%%%%%%%ingrese YZ en funcion de la confiabilidad
pag 39 PDF 19 %%%%%%%%%%%%%%
YZ = input('YZ')
CT = 1
mG = Ng/Np
pN = (pi/PN)*cosd(alfa)
mN = pN/(0.95*Z)
I = (cosd(alfat)*sind(alfat)*mG)/(2*mN*(mG+1))
ZE = 2300
sigmahlim1 = (2.22*HBP+200)*145.038
sigmahlim2 = (2.22*HBG+200)*145.038
%%%%%%%%factor de durabilidad%%%%%%%%%%%%%
ZNP = 1.4488*(N)^-0.023
ZNG = 1.4488*(N/u)^-0.023
%%%%%%%%%%%coef endurecimiento durante el trabajo%%%%%
RH = HBP/HBG
%%%%%%%%Ver grafico de la iz pag 37 pdf 19%%%%%
ZW = input('ZW')
%%%%%%%%%%%%%factores J%%%%%%%%%%%%
JP = YcP*JprimaP
JG = YcG*JprimaG
SF = (sigmaflim1*(YNP/(CT*YZ)))/(sigmaP) %%%Factor de
seg flex%%%%
sigmaG = (Wt*KA*KV*Ksg*(Pt/F)*((Kbetha*KB)/JG))
SG = (sigmaflim2*(YNG/(CT*YZ)))/(sigmaG) %%%Factor de
seg flex coron%%%%
sigmacP =
ZE*(Wt*KA*KV*Ksp*(Kbetha/(dp*F))*(Cf/I))^(1/2)
SHP = (sigmahlim1*(ZNP/(CT*YZ)))/sigmacP
sigmacG = sigmacP*(Ksg/Ksp)^(1/2)
SHG = (sigmahlim2*(ZNG/(CT*YZ)))/sigmacG