免費論壇 繁體 | 簡體
Sclub交友聊天~加入聊天室當版主
分享
返回列表 发帖

交互式操作与图像

  1. f = Integrate[Sqrt[1 - k^2 Sin[\[Phi]]^2], {\[Phi], 0, u},
  2.    Assumptions -> {0 < k < 1, 0 < u < 10}];
  3. Manipulate[
  4. Plot[{EllipticE[u, (2/3)^2], f /. k -> k1}, {u, 0, 10},
  5.   PlotRange -> {0, 10}], {k1, 0, 0.99, LabeledSlider}]
复制代码
分享到: QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友

返回列表 回复 发帖