几何中的Cornucopia
几何画板及绘图内容加载中,请稍等……
该范例展示了几何中的Cornucopia图形。它涉及几何、曲面、微分方程等核心数学概念。通过使用Surface、Sequence、Cone等GeoGebra命令,可以构造出复杂的几何图形。适合高中及以上学生或教师使用。
GeoGebra 命令及参数
Surface(x(A) + ((a * (1 + sin(i) + (r(i) * cos(j)))) * cos(i)), y(A) + ((b + (r(i) * cos(j))) * sin(i)), z(A) + (r(i) * sin(j)), i, 0.5, 3.092, j, 0, t) → dSequence(CurveCartesian[x(A) + ((a * (1 + sin(i) + (r(i) * cos(j)))) * cos(i)), y(A) + ((b + (r(i) * cos(j))) * sin(i)), z(A) + (r(i) * sin(j)), j, 0, t], i, 0.5, h, h / 10) → liste3Sequence(CurveCartesian[x(A) + ((a * (1 + sin(i) + (r(i) * cos(j)))) * cos(i)), y(A) + ((b + (r(i) * cos(j))) * sin(i)), z(A) + (r(i) * sin(j)), i, 0.5, 3.092], j, 0, t, t / n) → liste1Cone(H, H + (-0.02, -0.21, 0), 0.055) → e, p, iVector(H, H + (0.07, -0.3, 0)) → uJoin(Sequence[Sequence[(x(A) + ((a * (1 + sin(i) + (r(i) * cos(j)))) * cos(i)), y(A) + ((b + (r(i) * cos(j))) * sin(i)), z(A) + (r(i) * sin(j))), i, 0.5, 0.5], j, 0, t, t / n]) → liste2Sequence(Segment[I, Element[liste2, i]], i, 1, Length[liste2]) → liste4Sphere(J, 0.3) → jPoint(Circle[P, Distance[O, P], Segment[O, P]]) → QCube(O, P, Q) → m, S, faceQSWV, faceTUVW, arêteOS, arêteOP, arêtePQ, arêteQS, arêteOT, arêteSW, arêteTW, arêteTU, T, arêtePU, arêteUV, arêteQV, arêteVW, U, V, W, faceOPQS, faceOSWT, faceOPUT, facePQVUPolygon(N, A_1, Z) → poly1, z_1, n_1, a_1Midpoint(n_1) → KMidpoint(N, K) → LPyramid(A_1, Z, N, M) → l, face1, arêteMN, face3, faceMNZ, face2, arête2, arêteNZ, arête1, arête3, arêteMZCylinder(D_1, C_1, 0.2) → o, q, s, vCone(E_1, F_1, 0.2) → w, c_1, b_1Plane(J_1, I_1, K_1) → p_1PointIn(p_1) → G_1PointIn(p_1) → H_1Conic(G_1, H_1, J_1, I_1, K_1) → d_1