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
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.

```

• Prev by Date: Re: Advice on defining a data structure in Mathematica
• Next by Date: Re: Integrate with piecewise function
• Previous by thread: Using multiple reference to the same object
• Next by thread: RE: LogLogListPlot, LogLinearListPlot- Ticks and TickMarks