怎样用mathematica 画出二次曲线的图像(园,椭圆、双曲线、抛物线)标准式就行
问题描述:
怎样用mathematica 画出二次曲线的图像(园,椭圆、双曲线、抛物线)标准式就行
答
(* 圆:*)Graphics[Circle[]](*椭圆:*)Graphics[Circle[{0,0},{5,3}]](*双曲线:*)Get["Graphics`Implicitplot`"]ImplicitPlot[x^2 - y^2 == 1,{x,-2,2}](*抛物线:*)Plot[7 x^2 + 2 x + 1,{x,-10,10}]...