Dynamic GeoGebra Illustration
Loading the math board and drawing, please wait…
This example dynamically illustrates a geometric problem posted by Antonio Gutierrez on Twitter, involving logarithms, random variables, isosceles triangles, parametric curves, and real numbers. Key math concepts include logarithmic operations, random variable distributions, properties of isosceles triangles, parametric curve plotting, and real number representation. Construction highlights GeoGebra commands like Rotate, Ray, Point, Polygon, Line, Intersect, Segment, Midpoint, Angle, Min, Circle, CircleSector, Dilate, Vector, Translate, and OrthogonalLine. Suitable for high school and advanced learners to explore dynamic geometric transformations and core concept applications.
GeoGebra Commands & Parameters
Rotate(A, (a * π / 180), B) → A'Ray(B, A') → gPoint(g) → CPolygon(B, C, 4) → poly2, n, p, q, r, F, GLine(A, G) → h_3Polygon(C, A, 4) → poly1, j, k, l, m, D, ELine(B, D) → j_2Intersect(h_3, j_2) → D_1Rotate(A, If[0 < u ≤ 1, (u * π / 2), π / 2], C) → A'_1Rotate(C, If[0 < u ≤ 1, (u * π / 2), π / 2], C) → C'Segment(C', A'_1) → i'Midpoint(i') → VAngle(A, B, A') → αSegment(A, B) → fSegment(B, C) → hSegment(C, A) → iAngle(poly2) → β, γ, δ, εAngle(poly1) → ζ, η, θ, ιSegment(C, E) → sSegment(E, D) → tSegment(D, A) → bSegment(B, G) → cSegment(G, F) → dSegment(F, C) → eMin(i, h) → oCircle(E, (0.15 * o)) → c_1Polygon(B, A, C) → poly3, c_2, b_1, a_1Intersect(c_1, s, 1) → HIntersect(c_1, t, 1) → ILine(B, E) → f_1Line(A, F) → g_1Line(G, D) → h_1Circle(A, (0.15 * o)) → d_1Intersect(d_1, b, 1) → KIntersect(d_1, i, 1) → LCircleSector(A, K, L) → e_1Rotate(B, If[0 < u ≤ 1, (u * π / 2), π / 2], B) → B'Rotate(C, If[0 < u ≤ 1, (u * π / 2), π / 2], B) → C'_1Segment(B', C'_1) → h'Rotate(B', If[1 < u ≤ 2, ((u - 1) * π / 2), π / 2], G) → B''Rotate(C'_1, If[1 < u ≤ 2, ((u - 1) * π / 2), π / 2], G) → MSegment(B'', M) → h''Rotate(C', If[1 < u ≤ 2, ((u - 1) * π / 2), π / 2], E) → C''Rotate(A'_1, If[1 < u ≤ 2, ((u - 1) * π / 2), π / 2], E) → NSegment(C'', N) → i''Rotate(C'', If[2 < u ≤ 3, ((u - 2) * π / 2), π / 2], D) → C'''Rotate(N, If[2 < u ≤ 3, ((u - 2) * π / 2), π / 2], D) → N'Segment(C''', N') → i'''Rotate(B'', If[2 < u ≤ 3, ((u - 2) * π / 2), π / 2], F) → B'''Rotate(M, If[2 < u ≤ 3, ((u - 2) * π / 2), π / 2], F) → M'Segment(B''', M') → h'''Dilate(A, If[3.5 < u ≤ 4.5, 4.5 - u, 0], D) → A'_2Vector(A, A'_2) → vTranslate(e_1, v) → k_1Dilate(A, If[3.5 < u ≤ 4.5, 4.5 - u, 0], C) → A'_3Vector(A, A'_3) → wTranslate(e_1, w) → p_1Line(C, A) → i_1Point(i_1) → OAngle(O, C, F) → κRotate(p_1, If[4.5 < u ≤ 5.5, ((u - 4.5) * (π / 2 + κ)), π / 2 + κ], C) → q_1Rotate(k_1, If[4.5 < u ≤ 5.5, ((u - 4.5) * π / 2), π / 2], D) → r_1Dilate(D, If[5.5 < u ≤ 6.5, 6.5 - u, 0], E) → D'Dilate(C, If[5.5 < u ≤ 6.5, 6.5 - u, 0], F) → C'_2Vector(C, C'_2) → u_1Vector(D, D') → v_1Translate(r_1, v_1) → s_1Translate(q_1, u_1) → t_1Rotate(s_1, If[6.5 < u ≤ 7.5, ((u - 6.5) * π / 2), π / 2], E) → d_2Rotate(t_1, If[6.5 < u ≤ 7.5, ((u - 6.5) * π / 2), π / 2], F) → e_2Dilate(F, If[7.5 < u ≤ 8.5, 8.5 - u, 0], G) → F'Dilate(E, If[7.5 < u ≤ 8.5, 8.5 - u, 0], V) → E'Vector(E, E') → w_1Vector(F, F') → j_1Translate(d_2, w_1) → f_2Translate(e_2, j_1) → g_2Rotate(g_2, If[8.5 < u ≤ 9.5, ((u - 8.5) * π / 2), π / 2], G) → h_2Circle(G, 2) → p_2Circle(D, 2) → q_2Circle(F, 2) → r_2Intersect(r_2, g_1, 2) → PIntersect(p_2, h_1, 1) → QIntersect(d_1, g_1, 1) → RIntersect(q_2, h_1, 2) → SCircle(B, 2) → s_2Intersect(s_2, f_1, 1) → TIntersect(c_1, f_1, 2) → URotate(f_2, If[8.5 < u ≤ 9.5, ((u - 8.5) * π / 2), π / 2], V) → k_2Dilate(V, If[9.5 < u ≤ 10.5, 10.5 - u, 0], C) → V'Vector(V, V') → u_2Translate(k_2, u_2) → t_2Dilate(B, If[11 < u ≤ 12, 12 - u, 0], D) → B'_1Segment(B, B'_1) → m_2Dilate(A, If[12 < u ≤ 13, 13 - u, 0], D_1) → A'_4Segment(A, A'_4) → n_2Dilate(D_1, If[13 < u ≤ 14, 14 - u, 0], G) → J'Line(G, n_2) → g_3Point(g_3) → A_1Angle(F, G, A_1) → λCircle(B, (0.15 * o)) → r_3Intersect(r_3, f, 1) → B_1Intersect(r_3, h, 1) → C_1CircleSector(B, B_1, C_1) → s_3Line(C, D_1) → i_3Line(B, A) → j_3Intersect(j_3, i_3) → E_1Segment(D_1, J') → a_2Dilate(C, If[14 < u ≤ 15, 15 - u, 0], D_1) → C'_3Segment(C, C'_3) → m_1Dilate(D_1, If[15 < u ≤ 16, 16 - u, 0], E_1) → JSegment(D_1, J) → n_1OrthogonalLine(C, j_3) → i_2Intersect(j_3, i_2) → WDilate(A, If[16 < u ≤ 17, 17 - u, 0], W) → A'_5Vector(A, A'_5) → l_1Translate(e_1, l_1) → c_3Line(A, m_1) → l_2Point(j_3) → ZAngle(Z, A, D) → μRotate(c_3, If[16 < u ≤ 17, ((-(u - 16)) * μ), (-μ)], W) → d_3