f(x)=

Verschieben einer Funktion in x-Richtung

a = 2.9 (slider from -5 to 5, step 0.1)
f(x) = x^(3) - 2 * x^(2) + x - 1
Textfeld1 = Textfield(f)
A = Point(f)
B = Point(f)
u: (a, 0)
B' = Translate(B, u)
A' = Translate(A, u)
v = Vector(B, B')
w = Vector(A, A')
b = OrthogonalLine(B, u)
C = Intersect(b, xAxis)
Text1: "" + (LaTeX[C]) + ""
c = OrthogonalLine(B', xAxis)
C' = Intersect(c, xAxis)
d = Segment(B', C')
Text2: "" + (LaTeX[C']) + ""
e = Segment(B, C)
f_1 = Translate(f, u)