wolfram-mathematica - 3D グラフィックをプロットするとき、表示する角度を定義する方法は?

Question

プロットが完了したら、マウスで目的の角度に回転できることを知っています。今、コードを使って同じことをする方法を知りたいです。

Answer 1

ViewPoint3D ビューは、パラメーターおよびによって最も便利に定義されますViewVertical(追加のオプション: ViewCenter、ViewVector、およびViewAngleがありますが、通常は のままで十分Automaticです)。

たとえば、次のことができます

Plot3D[Cos[x^2 + y^2], {x, -3, 3}, {y, -3, 3}, ViewPoint -> {3, 2, 1}]

などの適切な値を取得するには、関数をViewPoint次のように定義しますGet3DView

Get3DView[gfx_] := 
  Options[Unevaluated[gfx], {ViewCenter, ViewVector, ViewVertical, ViewPoint}]

次に、グラフィックを にコピーしてGet3DView、オプションを取得します。

plotpar = Get3DView[<your graphics pasted here>]

plotparこの後、新しいプロット コマンドのオプションとして設定できます (評価に注意してください)。

Plot3D[Cos[x^2 + y^2], {x, -3, 3}, {y, -3, 3}, Evaluate@plotpar]

Answer 2

よく見ると、タイトルに 3D 回転が含まれています。そのために、ViewPointを使用できます。アプリケーションタブの下の例は、あなたが探しているもののようです。

ImageRotate関数を使用できます。

ImageRotate@Plot[x, {x, 0, 10}] (*rotate 90 degrees counterclockwise*)
ImageRotate[Plot[x, {x, 0, 10}], phi]  (*rotate phi degrees counterclockwise*)