Re: MultipleListPlot and Log-List plots
- To: mathgroup at smc.vnet.net
- Subject: [mg57270] Re: [mg57254] MultipleListPlot and Log-List plots
- From: "David Park" <djmp at earthlink.net>
- Date: Mon, 23 May 2005 02:20:38 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Alejandro,
One way to handle this is to convert your data to log values for x, then
plot with MultipleListPlot and then use a LogScale for the frame edge. There
are other more fancy ways if you want to add fitted curves. I don't think
you want the first data point at x = 0, because you can't fit that on a log
scale.
Needs["Graphics`MultipleListPlot`"]
Needs["Graphics`Graphics`"]
Needs["Graphics`Colors`"]
data =
{{{0., 1}, ErrorBar[{0., 0.}]}, {{0.13, 0.899147},
ErrorBar[{-0.0158522, 0.0158522}]}, {{0.37, 0.585022},
ErrorBar[{-0.0403446, 0.0403446}]}, {{0.7, 0.391931},
ErrorBar[{-0.0720489, 0.0720489}]}, {{1.11, 0.319891},
ErrorBar[{-0.0331414, 0.0331414}]}, {{3.07, 0.0951042},
ErrorBar[{-0.0216138, 0.0216138}]}, {{5.97, 0.0720401},
ErrorBar[{-0.0100861, 0.0100861}]}, {{22.24, 0.0461106},
ErrorBar[{-0.0158478, 0.0158478}]}};
data2 = Drop[data, 1] /. {{x_, y_}, err_ErrorBar} :> {{Log[10, x], y}, err};
MultipleListPlot[data2,
Frame -> True,
FrameTicks -> {LogScale, Automatic, None, Automatic},
FrameLabel -> {x, y},
Axes -> False,
PlotLabel -> "Log-Linear Multiple List Plot",
Background -> Linen,
ImageSize -> 450];
David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/
From: Carabe - Fernandez, Alejandro [mailto:a.carabe at imperial.ac.uk]
To: mathgroup at smc.vnet.net
Hi,
this is the only support address I find in the Wolfram webpage. If I
need to redirect this question to someone else, please let me know.
Here is the question:
I want to plot the following data set on a Log-Linear format:
{
{{0., 1}, ErrorBar[{0., 0.}]},
{{0.13, 0.899147}, ErrorBar[{-0.0158522, 0.0158522}]},
{{0.37, 0.585022}, ErrorBar[{-0.0403446, 0.0403446}]},
{{0.7, 0.391931}, ErrorBar[{-0.0720489, 0.0720489}]},
{{1.11, 0.319891}, ErrorBar[{-0.0331414, 0.0331414}]},
{{3.07, 0.0951042}, ErrorBar[{-0.0216138, 0.0216138}]},
{{5.97, 0.0720401}, ErrorBar[{-0.0100861, 0.0100861}]},
{{22.24, 0.0461106}, ErrorBar[{-0.0158478, 0.0158478}]}
}
I know I have to use MultipleListPlot to plot this, but the problem is
that Mathematica will return a Linear-Linear plot rather than a
Log-Linear plot. By the way, I am using Mathematica 4.1.
Thanks for your help,
A.Carabe