怎么用mathematica 画抛物线和直线的叠加图像?我要画y^2 == 4 (x + 4) x+y==-4的叠加图像使用了命令Plot[{y /.Solve[y^2 == 4 (x + 4),y],x + y == -4},{x,-5,4}] 结果出不来东西..我想画在同一个图里,画出这两个曲

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/16 12:04:56

怎么用mathematica 画抛物线和直线的叠加图像?我要画y^2 == 4 (x + 4) x+y==-4的叠加图像使用了命令Plot[{y /.Solve[y^2 == 4 (x + 4),y],x + y == -4},{x,-5,4}] 结果出不来东西..我想画在同一个图里,画出这两个曲
怎么用mathematica 画抛物线和直线的叠加图像?
我要画y^2 == 4 (x + 4) x+y==-4的叠加图像
使用了命令Plot[{y /.Solve[y^2 == 4 (x + 4),y],x + y == -4},{x,-5,4}]
结果出不来东西
..
我想画在同一个图里,画出这两个曲线并且表示出焦点.

怎么用mathematica 画抛物线和直线的叠加图像?我要画y^2 == 4 (x + 4) x+y==-4的叠加图像使用了命令Plot[{y /.Solve[y^2 == 4 (x + 4),y],x + y == -4},{x,-5,4}] 结果出不来东西..我想画在同一个图里,画出这两个曲
抛物线和直线最多有两个交点,你要画这两个交点吗?
还说把抛物线和直线画在同一个图中呢?
tu[1] = Plot[y /.Solve[y^2 == 4*(x + 4),y],{x,-5,4},
PlotStyle -> Blue];
tu[2] = Plot[y /.Solve[x + y == -4,y],{x,-5,4},
PlotStyle -> Green];
tu[3] = ListPlot[
Transpose[{x /.Solve[{y^2 == 4 (x + 4),x + y == -4},{x,y}],
y /.Solve[{y^2 == 4 (x + 4),x + y == -4},{x,y}]}],
PlotStyle -> Directive[Red,PointSize[.02]]];
Show[Table[tu[i],{i,1,3}]]
完毕,加分.