x-Linien anzeigen

Kontrolle

Ausgangsfunktion

Ableitungsfunktion

h(x) = (-1252 / 459375 * x^(6)) + (67644 / 1071875 * x^(5)) - (22901 / 42875 * x^(4)) + (433684 / 214375 * x^(3)) - (740546 / 214375 * x^(2)) + (409944 / 153125 * x) + 80587 / 65625
h2(x) = (4295 / 4148928 * x^(6)) - (11467 / 345744 * x^(5)) + (163375 / 691488 * x^(4)) + (2932205 / 1037232 * x^(3)) - (23552785 / 460992 * x^(2)) + (5090025 / 19208 * x) - 4276211 / 9604
f0(x) = If[0 ≤ x ≤ 8, h(x)]
P_1 = Point(f0)
P_2 = Point(f0)
P_3 = Point(f0)
P_4 = Point(f0)
P_5 = Point(f0)
P_6 = Point(f0)
Tangentenschnipsellänge = 0.9 (slider from 0 to 4, step 0.1)
k_1 = Circle(P_1, Tangentenschnipsellänge / 2)
k_2 = Circle(P_2, Tangentenschnipsellänge / 2)
k_3 = Circle(P_3, Tangentenschnipsellänge / 2)
k_4 = Circle(P_4, Tangentenschnipsellänge / 2)
k_5 = Circle(P_5, Tangentenschnipsellänge / 2)
k_6 = Circle(P_6, Tangentenschnipsellänge / 2)
Q_1 = Point(k_1)
Q_2 = Point(k_2)
Q_3 = Point(k_3)
Q_4 = Point(k_4)
Q_5 = Point(k_5)
Q_6 = Point(k_6)
g_1 = Line(Q_1, P_1)
g_2 = Line(Q_2, P_2)
g_3 = Line(Q_3, P_3)
g_4 = Line(Q_4, P_4)
g_5 = Line(Q_5, P_5)
g_6 = Line(Q_6, P_6)
S_1 = Intersect(k_1, g_1, 2)
S_2 = Intersect(k_2, g_2, 2)
S_3 = Intersect(k_3, g_3, 2)
S_4 = Intersect(k_4, g_4, 2)
S_5 = Intersect(k_5, g_5, 2)
S_6 = Intersect(k_6, g_6, 2)
t_1 = Segment(Q_1, S_1)
t_2 = Segment(Q_2, S_2)
t_3 = Segment(Q_3, S_3)
t_4 = Segment(Q_4, S_4)
t_5 = Segment(Q_5, S_5)
t_6 = Segment(Q_6, S_6)
M_1: (x(P_1) | Slope[g_1])
M_2: (x(P_2) | Slope[g_2])
M_3: (x(P_3) | Slope[g_3])
M_4: (x(P_4) | Slope[g_4])
M_5: (x(P_5) | Slope[g_5])
M_6: (x(P_6) | Slope[g_6])
go1: x = x(P_1)
go2: x = x(P_2)
go3: x = x(P_3)
go4: x = x(P_4)
go5: x = x(P_5)
go6: x = x(P_6)
a = true
M1 = NaN
M2 = NaN
kP: (0.1, -0.10)
U2 = NaN
O2 = NaN
L = -1 (slider from -5 to 5, step 0.1)
R = 13 (slider from -5 to 20, step 0.1)
f1(x) = f0'(x)
P3 = NaN
Text3: "f'(" + (LaTeX[x(P_3)]) + ") \approx " + (LaTeX[Slope[g_3]]) + ""
Text2: "f'(" + (LaTeX[x(P_2)]) + ") \approx " + (LaTeX[Slope[g_2]]) + ""
Text1: "f'(" + (LaTeX[x(P_1)]) + ") \approx " + (LaTeX[Slope[g_1]]) + ""
Text4: "f'(" + (LaTeX[x(P_4)]) + ") \approx " + (LaTeX[Slope[g_4]]) + ""
Text5: "f'(" + (LaTeX[x(P_5)]) + ") \approx " + (LaTeX[Slope[g_5]]) + ""
Text6: "f'(" + (LaTeX[x(P_6)]) + ") \approx " + (LaTeX[Slope[g_6]]) + ""
b = false
kL = -1 (slider from -5 to 5, step 0.1)
kR = 13 (slider from -5 to 20, step 0.1)
kU1 = -0.5 (slider from -5 to 5, step 0.1)
k = 1 (slider from -5 to 5, step 0.1)
kO1 = 6 (slider from -5 to 10, step 0.1)
kU2 = -4 (slider from -5 to 5, step 0.1)
kO2 = 2 (slider from -5 to 5, step 0.1)
gu1: x = x(P_1)
gu2: x = x(P_2)
gu3: x = x(P_3)
gu4: x = x(P_4)
gu5: x = x(P_5)
gu6: x = x(P_6)
A_1 = Point(gu1)
A_3 = Point(gu3)
A_4 = Point(gu4)
A_6 = Point(gu6)
A_2 = Point(gu2)
A_5 = Point(gu5)