作业帮wolfram mathematica
来源：学生作业帮 编辑：作业帮 分类：综合作业 时间：2024/05/26 22:35:21
wolfram mathematica
谁教我画一下：r=a(1-sinA) 这个函数图像!
谁教我画一下：r=a(1-sinA) 这个函数图像!
a = 6;
PolarPlot[a (1 - Sin[A]),{A,0,2*Pi}]
再问： 能不能叫我下这个：ContourPlot3D[(x^2 + 9 /4 y^2 + z^2 - 1)^3 - x^2 z^3 - 9/80 y^2 z^3, {x, -3, 3}, {y, -3, 3}, {z, -3, 3}, PlotPoints \[RightArrow] (1, 1), Axes \[RightArrow] True, Lighting \[RightArrow] False ContourStyle \[RightArrow] {RGBColor[1, 0.4, 0.7]}]
再答： ContourPlot3D[(x^2 + 9 /4 y^2 + z^2 - 1)^3 - x^2 z^3 - 9/80 y^2 z^3, {x, -3, 3}, {y, -3, 3}, {z, -3, 3}, PlotPoints -> 10, Axes -> True, Lighting -> Automatic, ContourStyle -> RGBColor[1, 0.4, 0.7]]
PolarPlot[a (1 - Sin[A]),{A,0,2*Pi}]
再问： 能不能叫我下这个：ContourPlot3D[(x^2 + 9 /4 y^2 + z^2 - 1)^3 - x^2 z^3 - 9/80 y^2 z^3, {x, -3, 3}, {y, -3, 3}, {z, -3, 3}, PlotPoints \[RightArrow] (1, 1), Axes \[RightArrow] True, Lighting \[RightArrow] False ContourStyle \[RightArrow] {RGBColor[1, 0.4, 0.7]}]
再答： ContourPlot3D[(x^2 + 9 /4 y^2 + z^2 - 1)^3 - x^2 z^3 - 9/80 y^2 z^3, {x, -3, 3}, {y, -3, 3}, {z, -3, 3}, PlotPoints -> 10, Axes -> True, Lighting -> Automatic, ContourStyle -> RGBColor[1, 0.4, 0.7]]