The 3D view is most conveniently defined through the parameters ViewPoint
and ViewVertical
(There are additional options: ViewCenter
, ViewVector
, and ViewAngle
, but it usually suffices to leave them on Automatic
).
So you can do for example
Plot3D[Cos[x^2 + y^2], {x, -3, 3}, {y, -3, 3}, ViewPoint -> {3, 2, 1}]
To get good values for ViewPoint
, etc. I define a function Get3DView
as
Get3DView[gfx_] :=
Options[Unevaluated[gfx], {ViewCenter, ViewVector, ViewVertical, ViewPoint}]
Then you just copy your graphics into Get3DView
to get your options:
plotpar = Get3DView[<your graphics pasted here>]
After this you can put your plotpar
as options for new plot commands (note the Evaluate):
Plot3D[Cos[x^2 + y^2], {x, -3, 3}, {y, -3, 3}, Evaluate@plotpar]