RE: PlotMarkers Broken
- To: mathgroup at smc.vnet.net
- Subject: [mg84528] RE: [mg84523] PlotMarkers Broken
- From: "Jaccard Florian" <Florian.Jaccard at he-arc.ch>
- Date: Wed, 2 Jan 2008 06:56:01 -0500 (EST)
- References: <200801020617.BAA10488@smc.vnet.net>
Hello Scott!
I noticed the same problem.
For a lot of issues in the <<Graphics` package, the 5.2 was much better
then 6.0.
For example, with 6.0, you have to know a lot of Mathematica subtilities
:
data=Table[{RandomReal[{-10,10}],RandomReal[{-10,10}]},{10}];
ListPlot[data,PlotRange->{{-12,12},{-12,12}},Frame->True,Axes->None,Epilog->{Text["mesure "<>ToString[Position[data,#][[1,1]]],#,{-1,1}]&/@data}]
But with 5.2, the same output was very easy to obtain :
data=Table[{Random[Real,{-10,10}],Random[Real,{-10,10}],StringJoin["mesure",ToString[i]]},{i,1,10}];
<<Graphics`
LabeledListPlot[data,PlotRange->{{-12,12},{-10,10}},Frame->True,Axes->None];
I also miss a lot ImplicitPlot.
For example, with 5.2 :
<<Graphics`
ImplicitPlot[x^2+3y^2==4,{x,-3,3}]
For the same Output in 6.0, you have to write much more :
ContourPlot[x^2+3y^2==4,{x,-3,3},{y,-2,2},AspectRatio->Automatic,Axes->True,Frame->False,AxesLabel->{"x","y"}]
I'm afraid Wolfram has also completely forgotten useful things for students. For example SurfaceOfRevolution.
If you want to rotate around the x-axis, with 5.2, it was very easy :
<<Graphics`
SurfaceOfRevolution[Cos[x],{x,0,2*Pi]},RevolutionAxis->{1,0,0}];
But with 6.0, you have to know much more maths... so the average student may not be able to obtain the surface!
ParametricPlot3D[{x,Sin[x]Cos[\[Theta]],Sin[x]Sin[\[Theta]]},{x,0,2\[Pi]},{\[Theta],0,2\[Pi]},AxesLabel->{x,y,z}]
So I really agree with Scott: Wolfram, please, let come back the <<Graphics` package!
Jaccard Florian
-----Message d'origine-----
De=A0: Scott [mailto:sguthery at gmail.com]
Envoy=E9=A0: mercredi, 2. janvier 2008 07:17
=C0=A0: mathgroup at smc.vnet.net
Objet=A0: [mg84523] PlotMarkers Broken
Not only is the help system in 6.0 a giant step backward from 5.x but
ListPlots have been gutted. TextListPlot and LabelListPlot are both
gone and we are I guess supposed to use PlotMarkers to get the same
functionality.
Unfortunately, no backward compatibility with TextListPlot is possible
since one has to wrap each point up as a one-element list. But even
doing this PlotMarkers is broken. For example, in the following for
some unknown reason a '1' is written over each marker making the
result a mess.
ListPlot[{{{1, 1}}, {{2, 2}}, {{3, 3}}},
PlotRange -> {{0, 4}, {0, 4}},
PlotMarkers -> {{1, 20}, {2, 20}, {3, 20}}, PlotStyle -> Black]
Please, Wolfram. If it ain't broke, don't fix it.
Cheers, Scott
- References:
- PlotMarkers Broken
- From: Scott <sguthery@gmail.com>
- PlotMarkers Broken