使用ParametricPlot3D,无法画出曲线,请问要怎么调整?
mathematica吧
全部回复
仅看楼主
level 3
YoungLu0 楼主
Subscript[r, 1][
l_] = \[Sqrt]2 Sin[\[Pi] l] {0, (Sin^2)[(\[Pi] l)/2], (
Cos^2)[(\[Pi] l)/2]};
Subscript[r, 2][
l_] = \[Sqrt]2 Sin[\[Pi] l] {(Sin^2)[(\[Pi] l)/2], (
Cos^2)[(\[Pi] l)/2], 0};
R[l_] = (1 - l)* Subscript[r, 1][l] + l *Subscript[r, 2][l];
ParametricPlot3D[R[l], {l, 0, 1}]
2022年10月14日 03点10分 1
level 4
Sin^2[x]等改成Sin[x]^2
Subscript[r, 1][
l_] = \[Sqrt]2 Sin[\[Pi] l] {0, Sin[(\[Pi] l)/2]^2,
Cos[(\[Pi] l)/2]^2};
Subscript[r, 2][
l_] = \[Sqrt]2 Sin[\[Pi] l] {Sin[(\[Pi] l)/2]^2,
Cos[(\[Pi] l)/2]^2, 0};
R[l_] = (1 - l)*Subscript[r, 1][l] + l*Subscript[r, 2][l];
ParametricPlot3D[R[l], {l, 0, 1}]
2022年10月14日 08点10分 2
感谢您的回答!问题已解决
2022年10月17日 08点10分
1