+/-

LR

g

g

+

-

W = 1 (slider from -5 to 5)
v = true
r = 1 (slider from -2 to 2)
a = 4 (slider from -5 to 5)
G = Point(yAxis)
G1: G + (1, 0)
g: y(G)
a_{1} = Mod(7, 2)
s = Segment((4.5, 0), (95.5, 0))
N = Point(s)
f = If(v, a + 1 / n^(r), a - 1 / n^(r))
L: x(N) - 5
R: x(N) + 5
O = Max(g + 2, 2)
U = Min(g - 2, -2)
F = Sequence((i, f(i)), i, 1, 100)
h = Ray(G, G1)
b = 1 (slider from -5 to 5)
Text1: "a_n = " + (LaTeX[a]) + " +\frac{1}{ n^{" + (LaTeX[r]) + "}}"
Text2: "a_n = " + (LaTeX[a]) + " - \frac{1}{n^{" + (LaTeX[r]) + "}}"