Werkzeug einblenden

g(x) = (0.0075 * x^(3)) - (0.1816 * x^(2)) + (1.568 * x)
P = (4.472452234821862, 2.2693021273615046)
Q = (7.872046183512394, 3.8867702951783913)
R: (Max[x(P), x(Q)] | Min[y(P), y(Q)])
g_{1} = Line(P, Q)
f(x) = If[0 ≤ x ≤ 14, g(x)]
a = false
dx = Vector(P, R)
dy = Vector(R, Q)