單項函數的圖形(3)
Author: 藍邦偉  老師

,

y=x^4

單項函數的圖形(3)

,.

,.

A = (-4, 0)
B = (4, 0)
C = (0, -4)
D = (0, 4)
a = false
b = false
c = false
u = Vector((x(Corner[1]), 0), (x(Corner[3]), 0))
v = Vector((0, y(Corner[1])), (0, y(Corner[3])))
A_1 = Corner(1)
A_4 = Corner(4)
A_2: (7 * Corner[1] + 3 * Corner[2]) / 10
A_3: (7 * Corner[4] + 3 * Corner[3]) / 10
多邊形1, a_1, a_2, a_3, a_4 = Polygon(A_1, A_2, A_3, A_4)
d = Segment(A_2, A_3)
i = false
j = false
h = -0.5 (slider from -5 to 5, step 0.1)
k = 0.6 (slider from -5 to 5, step 0.1)
f_1(x) = (x - h)^(2) + k
f(x) = (x - h)^(3) + k
g(x) = (x - h)^(4) + k
k_1: y = -(x - h)^(2) + k
p(x) = -(x - h)^(3) + k
q(x) = -(x - h)^(4) + k
e = false
ab: a * b
text4: "y=-(x" + (If[h > 0, "-", "+"]) + (abs(h)) + ")²" + (If[k < 0, "-", "+"]) + (abs(k))
text5: "y=-(x" + (If[h < 0, "+", "-"]) + (abs(h)) + ")³" + (If[k > 0, "+", "-"]) + (abs(k))
text1: "y=(x" + (LaTeX[If[h > 0, "-", "+"]]) + "" + (LaTeX[abs(h)]) + ")²" + (LaTeX[If[k < 0, "-", "+"]]) + "" + (LaTeX[abs(k)]) + ""
text2: "y=(x" + (LaTeX[If[h > 0, "-", "+"]]) + "" + (LaTeX[abs(h)]) + ")³" + (LaTeX[If[k < 0, "-", "+"]]) + "" + (LaTeX[abs(k)]) + ""
text3: "y=(x" + (LaTeX[If[h > 0, "-", "+"]]) + "" + (LaTeX[abs(h)]) + ")⁴" + (LaTeX[If[k < 0, "-", "+"]]) + "" + (LaTeX[abs(k)]) + ""
text6: "y=-(x" + (If[h < 0, "+", "-"]) + (abs(h)) + ")⁴" + (If[k < 0, "-", "+"]) + (abs(k))