Re: ListContourPlot
- Subject: [mg3312] Re: ListContourPlot
- From: ianc (Ian Collier)
- Date: 26 Feb 1996 11:56:19 -0600
- Approved: usenet@wri.com
- Distribution: local
- Newsgroups: wri.mathgroup
- Organization: Wolfram Research, Inc.
- Sender: daemon at wri.com
In article <4gi6lj$jkv at dragonfly.wolfram.com>, Lorenzo Pesce
<fish at chemie.fu-berlin.de> wrote:
>
> Hi to all,
> forgive, please, my unbelivable English.
>
> I have one question, how is possible to set the
> AxesLabel command for the ListContourPlot?
>
> When I set it, I just happen nothing.
> The comman line is the following:
>
> ListContourPlot[funarray,
> PlotRange ->{funmin, funmax},
> MeshRange ->{{xmin, xmax}, {ymin,ymax}},
>
> Contours -> 10 ,
> AxesLabel ->{"Internuclear distance","Z"},
> ColorFunction -> (GrayLevel[0.5 +/2]&)
> ]
>
> Any advice?
> Thank you very much in advance,
>
>
> Lorenzo
>
If you look at the default options for ListContourPlot
you see that there are no Axes drawn by default, however
there is a Frame. So you can use FrameLabel in place of
AxesLabel and I believe that it wil then do what you want.
In[1]:=
funarray = Table[ Sin[x y], {x, -3,3,.5},{y,-3,3,.5}];
In[2]:=
Options[ ListContourPlot ]
Out[2]=
{AspectRatio -> 1, Axes -> False, AxesLabel -> None,
AxesOrigin -> Automatic, AxesStyle -> Automatic,
Background -> Automatic, ColorFunction -> Automatic,
ColorOutput -> Automatic, ContourLines -> True,
Contours -> 10, ContourShading -> True,
ContourSmoothing -> True, ContourStyle -> Automatic,
DefaultColor -> Automatic, Epilog -> {}, Frame -> True,
FrameLabel -> None, FrameStyle -> Automatic,
FrameTicks -> Automatic, MeshRange -> Automatic,
PlotLabel -> None, PlotRange -> Automatic,
PlotRegion -> Automatic, Prolog -> {},
RotateLabel -> True, Ticks -> Automatic,
DefaultFont :> $DefaultFont,
DisplayFunction :> $DisplayFunction}
In[3]:=
ListContourPlot[funarray,
Contours -> 10 ,
FrameLabel ->{"Internuclear distance","Z"},
ColorFunction -> (GrayLevel[0.5 +#/2]&)
]
Out[3]=
-ContourGraphics-
I hope this helps.
--Ian
-----------------------------------------------------------
Ian Collier
Wolfram Research, Inc.
-----------------------------------------------------------
tel:(217) 398-0700 fax:(217) 398-0747 ianc at wolfram.com
Wolfram Research Home Page: http://www.wolfram.com/
-----------------------------------------------------------