5
$\begingroup$

In Mathematica 12.2, putting a 3D plot into a list can change the location of the labeled axes. Using the example in ListPlot3D documentation, the location of one of the labeled axes of

ListPlot3D[{{1, 1, 1, 1}, {1, 2, 1, 2}, {1, 1, 3, 1}, {1, 2, 1, 4}}, 
 Mesh -> All]

is different than the location of the same axis of

{ListPlot3D[{{1, 1, 1, 1}, {1, 2, 1, 2}, {1, 1, 3, 1}, {1, 2, 1, 4}}, 
 Mesh -> All]}

Any suggestions as to how to make the list version exactly the same as the unlisted version?

$\endgroup$

1 Answer 1

6
$\begingroup$

Be explicit about AxesEdge. If you use Automatic, it uses a different axes placement settings when enclosed inside a list. I don't know the reason for it.

p1 = ListPlot3D[{{1, 1, 1, 1}, {1, 2, 1, 2}, {1, 1, 3, 1}, {1, 2, 1, 
    4}}
  , AxesEdge -> {{-1, -1}, {-1, 1}, {-1, -1}}
  , Mesh -> All
  ]

{
 p1
 }
$\endgroup$

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service and acknowledge you have read our privacy policy.

Not the answer you're looking for? Browse other questions tagged or ask your own question.