Bug introduced in 10.4.1 or earlier and persisting through 11.3
CASE:3866444
The straightforward computation,
SliceContourPlot3D[x^2 + y^2 + z^2, "CenterPlanes", {x, -1, 1}, {y, -1, 1}, {z, -1, 1},
Contours -> {#}, ContourStyle -> Directive[Black, Thick], PlotPoints -> 200] & /@
{1, .1, .03, .02}
produces a second set of contours near the origin for larger values of Contours
and a set of misplaced Contours
for Contours -> {0.02}
. (Lest the reader suppose that PlotPoints
is too small, I have reproduced the fist plot with PlotPoints -> 1000
although very slowly and with barely enough memory on a 16GB PC.)
I have three questions:
- Is this a bug?
- Is there a workaround?
and, on a related issue,
- Why does
x^2 + y^2 + z^2 == 1
(for instance) with noContours
specified produce an empty plot?
Simpler Plots
Similar undesirable results can be obtained much more rapidly for PlotPoints -> 1000
with
SliceContourPlot3D[x^2 + y^2 + z^2, z == 0, {x, -1, 1}, {y, -1, 1}, {z, -1, 1},
Contours -> {#}, ContourStyle -> Directive[Black, Thick], PlotPoints -> 1000] & /@
{1, .1, .03, .02}
Incidentally, I find surprising the amount of time and memory required to produce these simple plots. For instance,
LeafCount[First[%]]
(* 13718841 *)
MaxRecursion
they seems to not work and the resolution is a complete mess. $\endgroup$