INICIAR

Velocidad

Velocidad Máxima

v_2

v_3

v_4

v_5

v_1

d_6 = 8.74 (slider from -2 to 10, step 0.01)
b = 710 (slider from 0 to 1000, step 0.001)
a = 8 (slider from 0 to 20, step 0.1)
t = 11.2 (slider from 0 to 16, step 0.1)
c = 1.4 (slider from 0 to 10)
d_1(t) = If[0 ≤ t < 8, 2 + a / (1 + (b * ℯ^(((-c) * t) + d_6)))]
d_2(t) = If[8 ≤ t < 10, 2 + a / (1 + (b * ℯ^(((-c) * t) + d_6)))]
d_3(t) = If[10 ≤ t < 12, 2 + a / (1 + (b * ℯ^(((-c) * t) + d_6)))]
d_4(t) = If[12 ≤ t < 14, 2 + a / (1 + (b * ℯ^(((-c) * t) + d_6)))]
P_1: (t, d_1(t))
P_2: (t, d_2(t))
P_4: (t, d_4(t))
P_3: (t, d_3(t))
A = (-7.5877428379833205, -0.5768329338629594)
B = (-0.29182945530204063, -0.6283212829697493)
C = (-7.187887558839784, 0.352372828582717)
D = (-0.3373261600205564, 0.2837216964403311)
E = (-8, 1)
F = (-1, 1)
G = (-7.823517417674996, -0.19925170707983142)
H = (-0.31802663082333815, -0.28506562225781495)
I = (4.63323954270184, 5.5674433928806595)
J = (5.222675991931027, 5.584606175916256)
d_5(t) = If[14 ≤ t < 16, 2 + a / (1 + (b * ℯ^(((-c) * t) + d_6)))]
P_5: (t, d_5(t))
K = (-6.474362878328188, 0.16116673666769876)
L = (-0.4097167451478789, 0.21265508577448888)
M = (1.8091840215059953, 2.385463418081031)
N = (6.079323631477445, 2.385463418081031)
O = (8.858843954287082, 3.284793249146298)
P = (9.500674754558865, 3.284793249146298)
Q = (11.151096812400588, 5.344327213417902)
R = (11.70123749834783, 5.344327213417902)
S = (13.417152494992797, 6.28828028037572)
T = (13.967293180940038, 6.28828028037572)
f = OrthogonalLine(P_1, xAxis)
g = OrthogonalLine(P_1, yAxis)
U = Intersect(yAxis, g)
V = Intersect(xAxis, f)
h = Segment(U, P_1)
i = Segment(P_1, V)
j = OrthogonalLine(P_2, xAxis)
k = OrthogonalLine(P_2, yAxis)
W = Intersect(yAxis, k)
Z = Intersect(xAxis, j)
l = Segment(Z, P_2)
m = Segment(W, P_2)
n = OrthogonalLine(P_3, xAxis)
p = OrthogonalLine(P_3, yAxis)
A_1 = Intersect(yAxis, p)
B_1 = Intersect(xAxis, n)
q = Segment(A_1, P_3)
r = Segment(B_1, P_3)
s = OrthogonalLine(P_4, xAxis)
e = OrthogonalLine(P_4, yAxis)
C_1 = Intersect(yAxis, e)
D_1 = Intersect(xAxis, s)
f_1 = Segment(C_1, P_4)
g_1 = Segment(P_4, D_1)
h_1 = OrthogonalLine(P_5, xAxis)
i_1 = OrthogonalLine(P_5, yAxis)
E_1 = Intersect(yAxis, i_1)
F_1 = Intersect(xAxis, h_1)
j_1 = Segment(E_1, P_5)
k_1 = Segment(P_5, F_1)
d(t) = If[0 ≤ t < 16, 2 + a / (1 + (b * ℯ^(((-c) * t) + d_6)))]
Velocity = NDerivative(d)
G_1 = Intersect(Velocity, l)
H_1 = Intersect(Velocity, i)
I_1 = Intersect(Velocity, r)
J_1 = Intersect(Velocity, g_1)
K_1 = Extremum(Velocity)
L_1: (10.9323, 2.8)
l_1 = OrthogonalLine(L_1, xAxis)
M_1 = Intersect(d_3, l_1)
m_1 = Tangent(P_5, d_5)
n_1 = Tangent(P_1, d_1)
p_1 = Tangent(P_2, d_2)
q_1 = Tangent(P_3, d_3)
r_1 = Tangent(P_4, d_4)
m_2 = Slope(p_1)
m_3 = Slope(q_1)
m_4 = Slope(r_1)
m_5 = Slope(m_1)
m_6 = Slope(n_1)