This code produces a crude intersection.
a = {-1/2, -1/2, -1/2};
b = {1/2, 1/2, 1/2};
R = RegionIntersection[Ball[a, 1], Ball[b, 1]];
Region[R]
How can I control the quality so that the intersection is cleaner?
$\begingroup$
How can I control the quality so that the intersection is cleaner?
$\endgroup$
5
How can I control the quality so that the intersection is cleaner?
1 Answer
$\begingroup$
$\endgroup$
The updated version 14.1.0 solved such problem.
$Version
a = {-1/2, -1/2, -1/2};
b = {1/2, 1/2, 1/2};
R = RegionIntersection[Ball[a, 1], Ball[b, 1]];
Region[R]
BoundaryDiscretizeRegion[RegionIntersection[Ball[{-1/2, -1/2, -1/2}, 1], Ball[{1/2, 1/2, 1/2}, 1]], MaxCellMeasure -> {"Length" -> 0.01}]. $\endgroup$Rstill represents the proper (undiscretzied) region.Regionjust doesn't display it in a nice way. $\endgroup$RegionPlot3D[RegionMember[R, {x, y, z}], {x, -1/2, 1/2}, {y, -1/2, 1/2}, {z, -1/2, 1/2}, Boxed -> False, Axes -> False, PlotPoints -> 100]$\endgroup$CSGRegion["Intersection", {Ball[a, 1], Ball[b, 1]}]$\endgroup$