UNIVERSIDAD DE LAS FUERZAS ARMADAS

DEPARTAMENTO DE MECÁNICA

“Fundamentos De Mecanismos”
DEBERES 3ER PARCIAL

Docente:
Ing. Fernando Olmedo
Alumno:
Cristina
Acosta
Nrc:
3374

EJERCICIO DE APLICACIÓN: Determinar las ecuaciones de una leva para el

polinomi 56789
 Condiciones Iniciales de la Subida del Seguidor

En primer lugar en la figura mostrada anteriormente se observan 10 condiciones de frontera,

posición, velocidad, aceleración, sobre aceleración y ping por lo tanto se precisan 10 constantes y
un polinomio de grado 9.
2 3 4 5 6 7 8 9
θ θ θ θ θ θ θ θ θ
s ( θ )=C 0 +C1 [] [] [] [] [] [] [] [] []
β
+C 2
β
+ C3
β
+C 4
β
+C 5
β
+C 6
β
+ C7
β
+C 8
β
+C 9
β
Ahora, se saca la primera derivada y tenemos velocidad
1 2 3 4 5 6 7 8
v (θ)=
1
[C +2C 2
β 1
θ
β[]
+3 C3
θ
β
+4 C4
θ
[]
β
+ 5C 5
θ
β
+6 C 6
θ
[]
β
+7 C7
θ
β
+ 8C 8
θ
[]
β
+9 C 9
θ
β [] [] [] [ ]]
Nuevamente derivamos para hallar la aceleración:
1 2 3 4 5 6 7
a (θ)=
1
β
2 [ []
2 C 2+ 6C 3
θ
β
+12C 4
θ
β []
+20 C 5
θ
β
+30 C 6
θ
β []
+ 42C 7
θ
β
+56 C8
θ
β
+72 C 9
θ
[]
β [] [] [ ]]
Al derivar la aceleración encontramos la sobre aceleración
1 2 3 4 5 6
1
[ []
j ( θ ) = 3 6 C 3 +24 C 4
β
θ
β
+60 C5
θ
β []
+120 C6
θ
β
+210 C 7
θ
β []
+336 C 8
θ
β
+504 C 9
θ
β [] [] [ ]]
Por último, encontramos el ping
 1 2 3 4 5
1
[
p ( θ )= 4 24 C 4 +120C 5
β
θ
β []
+360 C6
θ
β []
+840 C 7
θ
β
+1680 C 8
θ
[]
β
+3024 C 9
θ
β [] [ ]]
A continuación se reemplaza las condiciones de frontera en las ecuaciones encontradas
para θ=0 se tiene:

C 0=0 , C1 =0 ,C 2=0 , C 3=0 C 4=0

Y para θ=β
h=C5 +C 6 +C7 +C 8 +C 9
1
0= [5 C 5+ 6 C6 +7 C 7 +8 C8 +9 C 9 ]
β
1
0= [ 20 C 5+ 30C 6 +42 C 7+56 C 8 +72C 9 ]
β2
1
0= [ 60 C 5+ 120C 6 +210 C7 +336 C 8 +504 C 9 ]
β3
1
0= [ 120C 5 +360 C6 + 840C 7 +1680 C8 +3024 C 9 ]
β4
Ahora, este sistema lineal ingresamos en el Wolfram Mathematica para resolverlo

m=({{1, 1, 1, 1,1}, {5, 6, 7,8,9}, {20, 30, 42,56,72}, {60, 120, 210,336,504},
{120,360,840,1680,3024}});
b=({{h},{0},{0},{0},{0}});
LinearSolve[m,b]

Que despliega la solución:

{{C5 =126 h }, {C 6=−420 h}, {C 7=540 h }, {C 8=−315 h },{C9 =70 h}}

El polinomio resultante, se conoce como polinomio 5 6 7 8 9:

 5 6 7 8 9

[ [ ] [ ] [ ] [ ] [ ]]
s ( θ )=h 126
θ
β
−420
θ
β
+540
θ
β
−315
θ
β
+70
θ
β

EJERCICIO DE APLICACIÓN: Un fabricante de calzado para atletismo desea

efectuar el control de calidad de su producción, mediante un dispositivo que pruebe
tacones de goma, en su capacidad de resistir millones de ciclos de fuerza
semejantes a los que un pie humano al andar aplica al suelo. En la figura se indica
una función típica fuerza - tiempo de un andador, y una gráfica de presión - volumen
para un acumulador de pistón. Diseñe un sistema leva - seguidor que accione al
pistón de manera que genere una función fuerza - tiempo entre el talón semejante a
la mostrada. Deben elegirse diámetros de pistón adecuados para cada extremo.1

Figura 6.91. Requisitos del mecanismo para ensayo de tacones de zapatos

1
Ejercicio propuesto del Libro Diseño de Maquinaria de Robert L. Norton , pág. 435
De acuerdo a la curva presión vs. volumen se debe escoger el factor de escala para
obtener una curva de desplazamiento del seguidor vs. tiempo.

Fuerza en el talón/ Área del pistón=30 Volumen desplazado

F / A 2¿ 30 A 1 x

x=F /¿1 A 2¿

Suponiendo un diámetro del pistón2 de 50 mm se tiene un área A2 = 1963 mm2 y si se

cuenta con un diámetro del pistón1 de 25 mm se tiene un A1 = 490.74 mm2, de donde se
obtiene como factor de conversión que la fuerza puede ser traducida a mm:

x=F /74

Y por lo tanto el diagrama de desplazamiento del seguidor corresponde al siguiente

gráfico, ver Fig. 6.92:

Figura 6.92. Desplazamiento del seguidor

Con este gráfico se obtiene la ecuación s( ), utilizando el método polinomial, para lo cual
se reemplazan las siguientes condiciones de frontera:
 Desplazamiento 0 26.1 35.7 25.9 31.8 30.9 0
ángulo 0 60 120 180 240 300 360

Puesto que tenemos siete condiciones de frontera el polinomio debe tener siete
constantes:

2 3 4 5 6 (6.97)
θ θ θ θ θ θ
s ( θ )=C 0 +C1 [] [] [] [] [] []
β
+C 2
β
+ C3
β
+C 4
β
+C 5
β
+C 6
β

Reemplazando las condiciones de frontera en el polinomio, se obtiene siete ecuaciones

con siete incógnitas:

2 3 4 5 6
0=C0 +C 1 [ 0 ] +C 2 [ 0 ] +C 3 [ 0 ] +C 4 [ 0 ] +C5 [ 0 ] +C6 [ 0 ]
2 3 4 5 6
1 1 1 1 1 1
26.1=C 1
6[]+C 2
6
2
[]
+C 3
6
3
+C 4 []
6
4
+C 5
6
5
[]
+C 6
6
6
[] []
2 2 2 2 2 2
35.7=C1
6[]+C2
6 []
+ C3
6
+C 4 []
6
+C5
6 []
+C6
6 [] []
2 3 4 5 6
3 3 3 3 3 3
25.9=C1 [] 6
+ C2
6 []
+C 3
6
+ C4
6 []
+ C5
6
+ C6
6 [] [] []
2 3 4 5 6
4 4 4 4 4 4
31.8=C1
6[]
+C 2
6
+C3
6[]
+C 4
6
+C 5
6
+C6[]
6 [] [] []
2 3 4 5 6
5 5 5 5 5 5
30.9=C 1
[] 6
+ C2
6 []
+C 3
6
+C 4
6 []
+ C5
6
+ C6
6 [] [] []
2 3 4 5 6
6 6 6 6 6 6
0=C1
6 [] [
+C2
6
+C3
6 ] [
+C 4
6
+C5
6
+C6
6 ] [ ] [ ] [ ]
Se resuelve el sistema de ecuaciones mediante

m=({
{1/6, (1/6)^2, (1/6)^3, (1/6)^4, (1/6)^5, (1/6)^6},
{1/3, (1/3)^2, (1/3)^3, (1/3)^4, (1/3)^5, (1/3)^6},
{1/2, (1/2)^2, (1/2)^3, (1/2)^4, (1/2)^5, (1/2)^6},
{2/3, (2/3)^2, (2/3)^3, (2/3)^4, (2/3)^5, (2/3)^6},
{5/6, (5/6)^2, (5/6)^3, (5/6)^4, (5/6)^5, (5/6)^6},
{1, 1, 1, 1, 1, 1}
});
b=({
{26.1},
{35.7},
{25.9},
{31.8},
{30.9},
{0}
});

LinearSolve[m,b]

Y la solución es:

{{−123.92 },
{ 3905.45 } ,
{−18472.95 } ,
{ 35709.3 } ,
{−30899.88 } ,
{9882}}

Clear["Global`*"]
(*Datos*)
β=2π; Rb = 50
(*Ecuaciones*)
s=-123.92(θ/β)^1+3905.45(θ/β)^2-18472(θ/β)^3+35709.3(θ/β)^4-30899.9(θ/β)^5+9882(θ/β)^6
v=D[s,θ]
a=D[v,θ]
j=D[a,θ]
Plot[s,{θ,0,2π},AxesLabel->{" θ "," Desplazamiento s (θ)"},PlotStyle->{Red,Thick}]
Plot[v,{θ,0,2π},AxesLabel->{" θ "," Velocidad v (θ)"},PlotStyle->{Blue,Thick}]
Plot[a,{θ,0,2π},AxesLabel->{" θ "," Aceleración a (θ)"},PlotStyle->{Magenta,Thick}]
Plot[j,{θ,0,2π},AxesLabel->{" θ "," Sobraceleración j(θ)"},PlotStyle->{Yellow,Thick}]
PolarPlot[s+Rb,{θ,0,2π}]
D e s p la z a m ie n t o s
V e lo c id a d v
40

30
20

20

1 2 3 4 5 6

10
20

1 2 3 4 5 6

A c e le r a c ió n a S o b r a c e le r a c ió n j

200
1 00

100
50

1 2 3 4 5 6

1 2 3 4 5 6 100

200
50

50

60 40 20 20 40 60

50
Figura 6.93. Diagramas s,v,a,j, perfil de la leva y simulación