mathematica 方程的解,如何绘制出来

来源：学生作业帮编辑：搜搜做题作业网作业帮分类：数学作业时间：2024/04/28 06:13:12

一共有四个解,如何把它们绘制出来?在一张图上

那得看你要绘制它的什么特性了,这四个解,其实只有两个在实数域上有图形,不信你可以试试：

Solve[{Subscript[\[Omega],\[Theta]]^4 + Subscript[\[Omega],\[Theta]]^2 x + Subscript[\[Omega],\[Theta]]^2 + x + 1 == 0},Subscript[\[Omega],\[Theta]],Reals]

(*
{{Subscript[\[Omega],\[Theta]] -> ConditionalExpression[-Sqrt[1/2 (-1 - x) + 1/2 Sqrt[-3 - 2 x + x^2]],x < -1]},{Subscript[\[Omega],\[Theta]] -> ConditionalExpression[Sqrt[1/2 (-1 - x) + 1/2 Sqrt[-3 - 2 x + x^2]],x < -1]}}
*)

这个结果的含义是,在x<-1时,这个方程有两个实数解.也就是说在一般的直角坐标下,它只有两根线：
Plot[Evaluate[Subscript[\[Omega],\[Theta]] /.sol],{x,-10,10}]

所以所谓在一幅图里画出这四根线从一开始就是不可能的任务.当然我们可以去观察四个解的绝对值变化情况（注意其实有几根线在取绝对值时已经重合了）：

可以观察四个解的实部：

也可以观察四个解的虚部：

总之看你想观察哪方面了.

mathematica 方程的解,如何绘制出来如何用Mathematica的Plot函数绘制方程的图像 mathematica 如何解如下方程 mathematica 解方程解不出来,求助如何将mathematica中绘制的图形中的数据导出 Mathematica如何方程的解自动输出等号形式? Mathematica急问!如何在RegionPlot绘制的图像上绘制文字?就像Text函数! mathematica绘制一维波动方程曲线, mathematica解方程的问题 mathematica的双函数绘制问题 mathematica绘制两个定义域不同的函数 mathematica里面绘制一系列函数的方法