Animate[ContourPlot3D[
x^2 + y^2 + z^2 - y*z == 1, {x, -1.5, 1.5}, {y, -1.5,
1.5}, {z, -1.5, 1.5}, Mesh -> None,
ContourStyle -> Directive[Orange, Opacity[0.5]],
ViewPoint -> {Cos[t], Sin[t], 0}], {t, 0, 2 Pi, 0.000001}]
展示出来旋转的椭圆动画，椭圆为什么显示的是多面体的样子，而不是一个圆滑的椭圆

因为动态计算对性能要求高，所以默认Automatic的PlotPoints选项将给出较低的数值。你可以手动设置这个选项，但可能会很卡。建议先用Table绘制出所有的帧，再用ListAnimate创建动画控件

Animate[RegionPlot3D[
BoundaryDiscretizeRegion[
ImplicitRegion[x^2 + y^2 + z^2 - y*z <= 1, {x, y, z}],
MaxCellMeasure -> 0.015], PlotPoints -> 2,
PlotStyle -> Directive[Orange, Opacity[0.5]],
ViewPoint -> {Cos[t], Sin[t], 0}], {t, 0, 2 Pi, 0.000001},
AnimationRunning -> False]