![](https://iknow-base.cdn.bcebos.com/lxb/notice.png)
如何用mathematica画出函数图象
1个回答
展开全部
Show[ContourPlot[x^2 + y^2 == 1, {x, -1.2, 1.2}, {y, -1.2, 1.2}],
Plot[x, {x, -1.2, 1.2}],
Graphics[{Dashed, Arrow[{{0, -1.2}, {0, 1.2}}]}],
Graphics[{Dashed, Arrow[{{-1.2, 0}, {1.2, 0}}]}],
Graphics[{Red, Line[{{Sqrt[2]/2, Sqrt[2]/2}, {Sqrt[2]/2, 0}}]}],
RegionPlot[
x <= Sqrt[2]/2 && y <= x && y >= 0, {x, -1.2, 1.2}, {y, -1.2, 1.2},
PlotStyle -> {Directive[Yellow, Opacity[0.6]]}, Mesh -> {5, 4}]]
Plot[Log[y + Sqrt[-1 + y^2]], {y, -10, 10}]
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询