Re: Problem with labeling contour Lines
- To: mathgroup at smc.vnet.net
- Subject: [mg84392] Re: Problem with labeling contour Lines
- From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
- Date: Fri, 21 Dec 2007 03:19:50 -0500 (EST)
- References: <4769DF3A.908@anu.edu.au> <4769E4DA.7010008@smc.vnet.net> <fkcsus$1hm$1@smc.vnet.net>
Hi,
upgrade to version 6.0 ? Version 6.0 put Tooltip[] on the
contours ..
Regards
Jens
auf Iqbal wrote:
> I am having problem with labeling of the contour lines using the
> following code:
>
> ClearAll["Global`*"]
> Needs["ExtendGraphics`LabelContour`"]
> DelTau=3 10^(-3)
> mAngle=50;
> SigmaG=0.262
> g[K_]:=2*Sum[ I^(-n)*(Re[Exp[-(n^2) (SigmaG^2)]*Exp[I*n*(-mAngle)]])*
> BesselJ[n,2 Pi K],{n,1,250}]
> h[K_]:=BesselJ[0,2 Pi K]
> hOmega[deltaOmega_]:=1/(1+4 Pi^2 deltaOmega^2 DelTau^2)
> c=ContourPlot[(Abs[h[K]+g[K]]^2)*hOmega[deltaOmega],{K,0,8},{deltaOmega,0,175},
> Contours->8,ContourShading->None,PlotRange->All]
> LabelContourLines[c]
>
> When i execute LabelContourLines[c], i receive the following list of
> messages (*the description is excluded*) and the contour plot is
> returned without labels:
>
> First::normal , Part::pspec , Last::normal , NumberForm::sigz,
> Part::partw, Append::normal, Graphics::gprim
>
> In the same notebook, when i run the following example, the command
> LabelContourLines[c1] works absolutely fine:
>
> c1=ContourPlot[x y,{x,-4,4},{y,-4,4},ContourShading->False, Contours->8]
> LabelContourLines[c1]
>
> Can somebody please help me resolve this problem?
>
> Regards,
> Rauf Iqbal
> PhD Student
> Australian National Universitry, Canberra, Australia