三次元の球面上をさまよう曲線のパラメトリックな生成をManipulateで実装する。 これは球面の１変数の媒介変数表示です。 x=Cos[q/p t + s ] Sin[r t + s] y= Sin[q/p t + s] Sin[r t + s] z= Cos[r t + s] Mathematicaではワンセンテンスで書き下せます。 M…