LogLogListPlot, LogLinearListPlot- Ticks and TickMarks
- To: mathgroup at smc.vnet.net
- Subject: [mg44110] LogLogListPlot, LogLinearListPlot- Ticks and TickMarks
- From: Goyder Dr HGD <H.Goyder at rmcs.cranfield.ac.uk>
- Date: Thu, 23 Oct 2003 07:14:58 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
I have some data for viscoelastic material that covers a domain of (a
possibly record breaking) 16 decades.
There are two data sets in the form of frequency-modulus and
frequency-phase.
I wish to plot these as a LogLogListPlot and as a LogLinearListPlot
respectively.
I give an example data set and my attempts below.
For the LogLogListPlot how do I get more tick marks and tick labels on the x
and y axes in the form of 10^n where n may be positive or negative and is
not converted either to a decimal or preceded by 1.0 x?
For the LogLinearListPlot how do I get a sensible y scale on the left hand
side, perhaps 5 tick marks, keeping the symbol as Pi and fractions of Pi
rather than as a decimal? How do I get the y scale on the right hand side
which is missing?
Finally is there a method of plotting both the modulus and phase plots, one
above the other, with a common length of x axis so that the plots line up?
$Version
4.2 for Microsoft Windows (August 23, 2002)
With thanks
Hugh Goyder
<<Graphics`Graphics`
dataMod={{0.0000441`,0.17235397851085402`},
{0.002826688903271264`,0.17054704688191827`},
{0.01995380529308543`,0.18654391921210908`},
{0.06309947271367361`,0.1991224016811985`},
{0.30838050485086077`,0.16902478352365644`},
{2.020771029138572`,0.15922196827284404`},
{18.78`,0.13004168567510754`},
{235,0.0306816994047554`},
{37528.56652558414`,0.0018917905896175095`},
{6.587877458319267`*^7,0.0004240386915937393`},
{176400000000,0.00037223040387381913`}};
dataPhase={{0.0000441`,-0.1204146135120695`},
{0.002826688903271264`,-0.13517069864900902`},
{0.01995380529308543`,-0.16255296617752524`},
{0.06309947271367361`,-0.18099726139120903`},
{0.30838050485086077`,-0.206992194219821`},
{2.020771029138572`,-0.31060979281388995`},
{18.78`,-0.7977432152416727`},
{235,-1.0328372785012563`},
{37528.56652558414`,-0.5999068031058774`},
{6.587877458319267`*^7,-0.060924508138259004`},
{176400000000,-0.0299910048568779`}};
LogLogListPlot[{#[[1]],#[[2]]}&/@ dataMod,
PlotRange\[Rule]{{10^-5,10^12},{10^-4,1}},
AspectRatio\[Rule]2/5,
FrameLabel\[Rule] {"Frequency","Modulus"},
Frame\[Rule]True,ImageSize\[Rule] 72 9,
TextStyle\[Rule]{FontFamily->"Times",FontSize\[Rule]12}];
LogLinearListPlot[{#[[1]],#[[2]]}&/@ dataPhase,
PlotRange\[Rule]{{10^-5,10^12},
{-Pi/2,0}},AspectRatio\[Rule]1/5,
FrameLabel\[Rule] {"Frequency","Phase"},
Frame\[Rule]True,ImageSize\[Rule] 72 9,
TextStyle\[Rule]{FontFamily->"Times",
FontSize\[Rule]12}];
--
This message has been scanned for viruses and
dangerous content by the Cranfield MailScanner, and is
believed to be clean.