Prompted by an answer to question 170254, I considered
R = ParametricRegion[{{Cos[p] r Sin[t], r Sin[t] Sin[p], Cos[t] r},
1 <= r <= 2 && 0 <= t <= π/2 && 0 <= p <= π/2}, {r, t, p}];
Region[R, Axes -> True, AxesLabel -> {x, y, z}, LabelStyle -> {15, Bold, Black}]
which looks reasonable. However, seen from a different ViewPoint
, it is not. Modest changes to ViewPoint
do not change this appearance.
Region[R, Axes -> True, AxesLabel -> {x, y, z}, LabelStyle -> {15, Bold, Black},
ViewPoint -> {-3, -1, 1/2}]
The interior surface is misshapen. Have I overlooked something, or is this a bug?
As J.M. noted in a comment, this looks like the result of insufficient sampling. Yet, I would expect the appearance of the region to be the same in the y - z plane as in the x - z plane due to symmetry. Incidentally, PlotPoints
is not an accepted option for Region
.
Region[]
sometimes produces pictures where the sampling is insufficient; you'd see similar things with(Boundary)DiscretizeRegion[]
. $\endgroup$PlotPoints
is not accepted as an Option. By the way, I would expect the appearance of the region to be the same in the y - z plane as in the x - z plane due to symmetry $\endgroup$ParametricRegion[]
results in a much smoother curve. $\endgroup$