积极 AI Logo 积极 AI

欠阻尼振动模拟：弹簧-质量系统的动态演示

欠阻尼振动模拟：弹簧-质量系统的动态演示
几何画板及绘图内容加载中，请稍等……
2021-09-07 07:46
函数微积分参数方程滑块动画函数图像
所属专题 MATH1052-edX
该范例通过GeoGebra动态模拟欠阻尼（Underdamping）条件下弹簧-质量系统的振动过程，直观展示位移随时间衰减振荡的物理现象。核心数学概念包括二阶常微分方程（SolveODE）、阻尼系数β、固有频率ω、初始条件（位置x0与速度xprime0）以及指数衰减包络线。作图要点：利用SolveODE命令求解运动方程，结合Length、First、Zip、Max、Min等函数处理解曲线数据；通过Segment、Ray、CurveCartesian绘制弹簧、平台和位移曲线；使用Textfield、Button等交互控件调节参数（如质量m、阻尼β、刚度k）并实时更新图形。适合高中物理或大学普通物理课程中振动与微分方程的教学演示，也可用于数学建模中参数对系统行为影响的探究。

GeoGebra 命令及参数

  1. SolveODE((2 * p), ω^(2), 0, 0, x0, xprime0, maxTime, 0.04) → Solution
  2. Length(Solution) → len
  3. First(Solution, len) → LP
  4. If(D < 0, "Underdamping", If[D ≟ 0, "Critical damping", "Overdamping"]) → textClass
  5. Zip(y(P), P, LP) → LxP
  6. Max(LxP) → max
  7. Min(LxP) → min
  8. Segment(C1, C2) → platform
  9. Textfield(x0) → Inpx0
  10. Textfield(xprime0) → Inpxprime0
  11. Textfield(m) → Inpm
  12. Textfield(k) → Inpk
  13. Textfield(β) → Inpβ
  14. Ray((100, 0), (-100, 0)) → eqpos
  15. If(ylength < 0, CurveCartesian[(width * sin((((fr * 2) * π) * (t - y_1) / (y_0 - y_1)))) + x(A2), t, t, y_0, y_1], CurveCartesian[(width * sin((((fr * 2) * π) * (t - y_1) / (y_0 - y_1)))) + x(A2), t, t, y_1, y_0]) → spring
  16. CurveCartesian((width * sin((((fr * 2) * π) * (t - sect) / (y_0 - sect)))) + x(A2), t, t, sect, y_0) → springFixed
  17. Segment(PS, PS + (0, sect)) → end
  18. Segment((x(A2), 0), (x(A2), 0) + (0, sect)) → endFixed
  19. If(abs(max) < 0.4, 0.5, max) → ymax
  20. If(abs(min) < 0.4, -1.2, min) → ymin
  21. Segment((0, ftime), ((facTime * time), ftime)) → hor
  22. Segment(((facTime * time), 0), ((facTime * time), ftime)) → ver
  23. Textfield(maxTime) → InpMTime

AI 绘图提示语参考

画一个弹簧-质量系统，展示欠阻尼振荡。首先画一个平台，然后画一根弹簧连接到平台上，弹簧的另一端连接一个质量块。质量块在平台上做欠阻尼振荡，振幅随时间衰减。使用滑块调整质量、弹簧刚度和阻尼系数，实时更新图形。画出质量块的位移曲线，显示最大和最小位移，以及时间轴上的时间标记。
以上提示语为根据原始绘图命令整理而来，仅供参考。