Re: SymbolShape

• To: mathgroup at smc.vnet.net
• Subject: [mg53304] Re: [mg53272] SymbolShape
• From: "David Park" <djmp at earthlink.net>
• Date: Wed, 5 Jan 2005 01:21:22 -0500 (EST)
• Sender: owner-wri-mathgroup at wolfram.com

```One method...

<< Graphics`Graphics`
<< Graphics`MultipleListPlot`

points1 = {{9 + 273, 0.012}, {11 + 273, 0.016}, {12 + 273, 0.15}, {13 + 273,
0.32}, {15 + 273, 0.3}, {18 + 273, 0.195}, {20 + 273, 0.098}, {22 +
273,
0.055}, {25 + 273, 0.02}, {30 + 273, 0.017}};

points2 = points1 /. {x_, y_} -> {x, Log[10, y]};

Show[Graphics[
{PlotSymbol[Triangle, 5, Filled -> False] /@ points2}],
PlotRange -> All,
Frame -> {True, True, False, False},
FrameTicks -> {Automatic, LogScale, None, None}];

David Park

From: Naima Khelfaoui [mailto:naima.khelfaoui at metz.supelec.fr]
To: mathgroup at smc.vnet.net

Hi,
I need to know  how  I can change the shape of the points (to  box or
triangle) when I use LogListPlot ?
for example :

In[1]:=
<< Graphics`Graphics`
In[2]:=
points1 = {{9 + 273, 0.012}, {11 + 273, 0.016}, {12 + 273, 0.15}, {13 + 273,
0.32}, {15 + 273, 0.3}, {18 + 273, 0.195}, {20 + 273,
0.098}, {22 + 273, 0.055}, {25 + 273, 0.02}, {30 + 273, 0.017}};
In[4]:=
a11 = LogListPlot[points1, PlotStyle -> {PointSize[0.02], Hue[.6]},
GridLines -> None, PlotRange -> All];

Thanks.

```

• Prev by Date: DisplayTogether has stopped working
• Next by Date: Re: How to draw a trajectory in DensityPlot&#65311;
• Previous by thread: Re: SymbolShape
• Next by thread: any updates to Mathematica control system professional application?