Mathematica绘制函数图像—隐函数图像( 四 )


5        Contours 确定等高线的密集水平 。
ContourPlot[F[x, y], {x, -10, 10}, {y, -10, 10},  ContourStyle -> Dashed, Contours -> 20]
        和
ContourPlot[F[x, y], {x, -10, 10}, {y, -10, 10},  ContourStyle -> None, Contours -> 20]

Mathematica绘制函数图像—隐函数图像

文章插图

Mathematica绘制函数图像—隐函数图像

文章插图

6        绘制3D曲面的时辰, 不想要网格线, 可以Mesh->None;
        若是有网格线, 那么MeshStyle确定网格线的模样 。
        代码是
ContourPlot3D[ x^x + y^y + z^z == 2.3, {x, 0, 1.1}, {y, 0, 1.1}, {z, 0, 1.1},  Axes -> False, Mesh -> None, PlotLabel -> Style[怎么能把外框去失落, Red, 30],  ColorFunction -> Function[{x, y, z}, Hue[x + y + z]]]
        和
ContourPlot3D[ x^x + y^y + z^z == 2.3, {x, 0, 1.1}, {y, 0, 1.1}, {z, 0, 1.1},  Axes -> False,  PlotLabel -> Style[怎么能把外框去失落, Red, 30],  MeshStyle -> Dashed, Mesh -> 5,  ColorFunction -> Function[{x, y, z}, Hue[x + y + z]]

Mathematica绘制函数图像—隐函数图像

文章插图

Mathematica绘制函数图像—隐函数图像

文章插图

注重事项提出几个问题, 留给乐趣相投的网友:
要包管x^x + y^y=a的图像是封锁曲线, a的最年夜值和最小值别离是几多?
要包管x^x + y^y+z^z=a的图像是封锁曲面, a的最年夜值和最小值别离是几多?
怎么证实(x^2 + y^2)^4 - 45 (x^2 + y^2)^3 - 41283 (x^2 + y^2)^2 +7950960 (x^2 + y^2) + 16 (x^2 - 3 y^2)^3 +48 (x^2 + y^2) (x^2 - 3 y^2)^2 - 720^3 + (x^2 - 3 y^2) x (16 (x^2 + y^2) ^2 - 5544 (x^2 + y^2) +266382) = 0的曲线是等宽曲线?
怎么把一个隐函数方程转化为参数方程?
处处滑腻的等宽曲线, 都有哪一些?
用Mathematica给图形添加标签, 若是标签出格长而不克不及完整显示, 应该怎么办?
Mathematica图形的标签里面, 能不克不及有“?问号”?

以上内容就是Mathematica绘制函数图像—隐函数图像的内容啦, 希望对你有所帮助哦!

推荐阅读