Mathematica作3D图如何加颜色

有这个命令?好像只有ListVectorPlot3D和VectorPlot3D命令,而且都是用来画向量场的.单个向量是不好画的,因为不知道起点.向量可以用有向线段表示,就是箭头嘛~于是Graphics

你问的是矩阵的分解吧,Mathematica中矩阵分解的命令为：JordanDecomposition[A],表示将矩阵A分解为A=PBP^(-1)的形式,例如：A={{1,2,3},{2,1,3},

PDF[NormalDistribution[0,1],x]即是以x为变量的概率密度函数表达式,要画的话用Plot[PDF[NormalDistribution[0,1],x],{x,-3,3}]即可

平面图,立体图,密度图,等位图,散点图,声波图,很多图都是创造性的,想要固定的答案就显得很僵硬了建议你却学问社区多看看吧

使用PlotLlabel选项实现,如：ContourPlot3D[x^2+y^2==z^2,{x,-3,3},{y,-3,3},{z,-3,3},PlotLabel->x^2+y^2==z^2]

把(x,y)的分布设置成二维的list,然后ListPlot3D[f[list],g[list]],你自己试试,应该问题不大.再问：求详细解答谢谢再答：在F1帮助里面搜函数名，可以得到函数的用法

Manipulate[Plot3D[(x-b)^2+y^2==b^2,{x,-100,100},{y,-100,100}],{b,-100,100}]再问：原方程是个柱面，用Plot3D好像不行啊Ma

ListPlot/@Transpose[{(x1,y1),(x2,y2).(xn,yn)}](*Mathematica_7.0*)

3D心-x^2z^3-(9y^2z^3)/80+(x^2+(9y^2)/4+z^2-1)^3==0

可以出的,再问：如果我想依次画出y[1,0,mu]y[0.99,0,mu]y[0.9,0,mu]y[1,1,mu]y[1,2,mu]怎么弄？另外，要是把您画的这个的直线部分的下部分抹掉怎么弄？如果分开

你这里g,l,m的值都没有给出来,我直接帮你假定g=9.8;l=1;m=1画图：Plot[Sqrt[2*g*l*Sin[t]],{t,0,2Pi}]Plot[3*m*g*Sin[t],{t,0,2Pi

Solve[ax^3+bx^2+cx+d==0,x]你可以复制到mathematica中

f1=x^2+y^2/2;f2=x^2-y^2/2;ContourPlot[{f1==1,f2==1},{x,-5,5},{y,-5,5},Axes->True,Frame->False]在剑忘的答案

加个参数AxesOrigin->{0,0}Plot[1/(x-1)+2,{x,-2,4},AxesOrigin->{0,0}]Plot[1/(x-1)+2,{x,-2,4},AxesOrigin->{

H=x1[t]^2+x2[t]^2;equ={D[x1[t],t]==x1[t]+H,D[x2[t],t]==x1[t]*x2[t]-H};sol=DSolve[equ,{x1,x2},t]但这样求不

Mathematica的话,可以看看ListPlot3D和ListPointPlot3D的帮助.

是S[b1,b2]而不是S,还有,这种毫无必要的延迟赋值也大幅拖慢了求解速度.这样：x[t_,b1_,b2_]=2t+1+b1*Sin[Pi*t]+b2*Sin[2*Pi*t];S[b1_,b2_]=

我给你画好了~

用专用的图形包,比如箭头,直方图什么的,可以去help查阅一下具体的你也可以学问社区多看看,那里的mathemtatica小组的资源很多

7