Wolfram Language

Volume Visualization

Custom Planes

Specify the slices to use for subsampling the volume as equations.

show complete Wolfram Language input
In[1]:=
Click for copyable input
opts = {ColorFunction -> ColorData[{"GreenPinkTones", {-2.5, 2.5}}], ColorFunctionScaling -> False, ClippingStyle -> Automatic, PlotTheme -> "Bare", SphericalRegion -> True, ImageSize -> 500, PlotPoints -> 32};
In[2]:=
Click for copyable input
SliceContourPlot3D[ 1/Sqrt[(1 + x)^2 + (1 + y)^2 + z^2] - 1/ Sqrt[(-1 + x)^2 + (-1 + y)^2 + z^2], {x == -1, x == 1, y == -1, y == 1, z == -1, z == 1}, {x, -2, 2}, {y, -2, 2}, {z, -2, 2}, Contours -> Range[-2.5, 2.5, 0.5], Evaluate@opts]
Out[2]=

Related Examples

de es fr ja ko pt-br ru zh