f(x) = ℯ^(x) - 1
B1 = Point(f)
B2 = Point(f)
B3 = Point(f)
B4 = Point(f)
B0 = Point(f)
B5 = Point(f)
φ = Polynomial({B0, B1, B2, B3, B4, B5})
scale = -1.5 (slider from -8 to 0, step 0.5)
W(x) = ((((((x - x(B0)) * (x - x(B1))) * (x - x(B2))) * (x - x(B3))) * (x - x(B4))) * (x - x(B5)))
e(x) = (abs(f(x) - φ(x)) * 10^((-scale)))
w(x) = (abs(W(x)) / 720 * 10^((-scale)))