※ 引述《silverywings (puss)》之銘言：
: 一向量 cos(2θ) êr - r êθ +z êz
: 請問要怎麼畫出來
若問題是將柱坐標向量 cos(2θ) ê_r - r ê_θ +z ê_z 以直角坐標表示，
可用 CoordinateTransform 指令進行轉換。
例如 CoordinateTransform["Cylindrical" -> "Cartesian", {r, θ, z}]
將柱座標 {r, θ, z} 轉換成 {r Cos[θ], r Sin[θ], z}。
以下程式以 Manipulate 顯示各種柱座標 {r, θ, z} 下的直角坐標向量。
origin = {0, 0, 0};
InsetShift = {0, 0, .1};
Manipulate[
vector$Cylind = {Cos[2θ], -r, z};
vector =
CoordinateTransform["Cylindrical" -> "Cartesian", vector$Cylind];
Graphics3D[
{PointSize@Large, Point@origin, Arrow@{origin, vector},
Inset[N@vector, vector + InsetShift]},
Axes -> True,
AxesLabel -> {"x", "y", "z"},
ImageSize -> 280,
PlotRange -> {{-1, 1}, {-1, 1}, {-1, 1}},
ViewPoint -> {2.2, -2.3, 1.2}, ViewVertical -> {0.18, -0.18, 1}],
{{r, 0}, -Pi, Round[Pi, 10^-8], Appearance -> "Labeled"},
{{θ, 0}, -Pi/4, Pi/4, Appearance -> "Labeled"},
{{z, 0}, -1, 1, Appearance -> "Labeled"}]