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

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}]