level 3
ContourStyle -> {Yellow}, MeshFunctions -> Function[{x, y, z}, x^2 + y^2 + z^2 - 2],
MeshStyle -> {Blue, Thick}]~Show~
ContourPlot3D[{x^2 + y^2 + z^2 == 2}, {x, -2, 2}, {y, -2, 2}, {z, -2, 2},
ContourStyle -> {Red}, Mesh -> None]

参:https://mathematica.stackexchange.com/a/32394/1871