Bug persisting through 11.2.0
When I use ShrinkWrap
to remove the white space around my 3D graphics, it always removes any text around the edges. Say for example I plot a sphere and some text:
Show[Graphics3D[{Sphere[], Text[Style["ABC", 24], {1, 1, 1}]}], Boxed -> False]
And if I use ShrinkWrap
, it removed the text and part of the sphere
Show[Graphics3D[{Sphere[], Text[Style["ABC", 24], {1, 1, 1}]}], Boxed -> False,
Method -> {"ShrinkWrap" -> True}]
How to prevent this?
{$Version, $ReleaseNumber, $LicenseID}
, so I recommend to include this in the original report. $\endgroup$