density plot
f[x_, y_] :=
Sin[2x] Sin[y];
d1=DensityPlot[
f[x,y],{x,-3,3},
{y,-3,3},PlotPoints
->23,ColorFunction
->Hue];
|
contour plot
f[x_, y_] :=
Sin[2x] Sin[y];
c1=ContourPlot[
f[x,y],{x,-3,3},
{y,-3,3},Contours
->9,PlotPoints->73,
ContourLines->False,
ColorFunction->Hue];
|
surface plot
f[x, y]:=
Sin[2x] Sin[y];
p1=Plot3D[f[x,y],
{x,-3,3},{y,-3,3},
PlotPoints->63,Mesh->
False,ColorFunction->
(Hue[.3+.5#]&)];
|
combo plate
Graphics3D[First
[Graphics[ac[k]]]/.
Line[x_]:>Line[Map[
Append[#,k]&,x]];
Show[surf,Table[
{g1[k],g2[k]},
{k,-.9,.9,.2}]
|