RE: Scientific Notation in ListPlot Axes
- To: mathgroup at smc.vnet.net
- Subject: [mg47376] RE: [mg47336] Scientific Notation in ListPlot Axes
- From: "David Park" <djmp at earthlink.net>
- Date: Wed, 7 Apr 2004 03:16:35 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Patrick,
<< Graphics`Graphics`
data = {{10^-6, 72}, {10^-5, 60}, {10^-4, 45}, {10^-3, 31}, {10^-2,
33}, {10^-1, 32}};
xticks = Table[{N[10^n], ScientificForm[N[10^n], 1,
NumberFormat -> (#2^#3 & )]}, {n, -6, -1, 1}];
LogLinearListPlot[data,
Ticks -> {xticks, Automatic},
PlotRange -> {0, 100},
Prolog -> AbsolutePointSize[4]];
David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/
From: Patrick Spicer [mailto:pspicer at fuse.net]
To: mathgroup at smc.vnet.net
Hi,
I apologize up front for posting a seemingly FAQ...but I searched the
archives and did not find what I need.
How can I format the axis of a LogLinearListPlot to display tick
labels as scientific notation without the "1 x " portion? In other
words, I'd just like to display the base 10 and superscript exponent.
Here is an example of a plot whose x-axis I'd like to label in this
way:
data = {{10^-6,72},{10^-5,60},{10^-4,45},{10^-3,31},{10^-2,33},{10^-1,32}}
<< Graphics`Graphics`
LogLinearListPlot[data,
Ticks->{{10^-6,10^-5,10^-4,10^-3,10^-2,10^-1},Automatic},
PlotRange->{0, 100}]
Many thanks in advance for your help.
Best regards,
Pat