他们就没交线,没人会,改成x+2y+3z=2吧
p1 = ContourPlot3D[
x + 2 y + 3 z == 2, {x, -1, 1}, {y, -1, 1}, {z, -1, 1},
Mesh -> None];
p2 = ContourPlot3D[
x^2 + y^2 + z^2 == 1, {x, -1, 1}, {y, -1, 1}, {z, -1, 1},
Mesh -> None];
p3 = ContourPlot3D[
x + 2 y + 3 z == 2, {x, -1, 1}, {y, -1, 1}, {z, -1, 1},
RegionFunction -> Function[{x, y, z}, x^2 + y^2 + z^2 <= 1],
BoundaryStyle -> Directive[Thickness[0.01], Dashed, Green]]
Show[{p1, p2, p3}]
温馨提示:内容为网友见解,仅供参考