- plane=InfinitePlane[{0,0,0.25},{{-1,1,0},{1,0,-1}}];
- Graphics3D[{{Opacity[0.5],PolyhedronData["Octahedron","Faces"]},{Opacity[0.8],Blue,plane}},Boxed->False,Axes->False]
Copy the Code
- plane=InfinitePlane[{0,0,0.5},{{-1,1,0},{1,0,-1}}];
- Graphics3D[{{Opacity[0.5],PolyhedronData["Octahedron","Faces"]},{Opacity[0.8],Blue,plane}},Boxed->False,Axes->False]
Copy the Code
|