MathGroup Archive 1995

[Date Index] [Thread Index] [Author Index]

Search the Archive

GridLines in LogLogPlot

  • To: mathgroup at christensen.cybernetics.net
  • Subject: [mg836] GridLines in LogLogPlot
  • From: sergio at shark.inst.bnl.gov (Sergio Rescia)
  • Date: Tue, 25 Apr 1995 02:17:22 -0400

Dear Mathgrouper,

Please take a look at the attached graphics file (It is a LogLogPlot: it needs 
Graphics`Graphics` to display).

The grid lines at the bottom, horizontally are wrong.

There are correctly grid lines at y=2. 10^-6 and 5. 10^-6.
I would expect two more grid lines at y=3. 10^-6 and y=4. 10^-6. Instead there is only a single 
grid lines which turns out to be at y=3.5 10^-6.

This is mathematically correct, of course, but nevertheless it is very confusing
when showing this kind of plots to an engineering audience.

Is there a fix to allow for grid lines in a 2-3-4-5...or possibly a 2-5-10 sequence in a LogLogPlot?

Thank you,

Sergio Rescia
----------

Graphics[{{Dashing[{0.001, 0.01, 0.001, 0.01, 0.01, 0.01, 0.01}], 
    {Line[{{3., -5.698969964092289}, 
       {5.814274915209454, -5.682461599957744}, 
       {6.114971756156057, -5.639235342167116}, 
       {6.290951906822026, -5.582462306793246}, 
       {6.415835078574056, -5.523628409009623}, 
       {6.591870765663436, -5.421424746213352}, 
       {6.716781713621753, -5.345673060159242}, 
       {7.017770022976582, -5.184025664453574}, 
       {7.318779173985399, -5.035130685352803}, 
       {7.619798746946607, -4.884551483699221}, 
       {7.9208235311654, -4.734041617437842}, 
       {8.09691305305879, -4.645996861160485}, 
       {8.22185092108334, -4.583527926937506}, 
       {8.31876041294031, -4.535073181025712}, 
       {8.39794131155353, -4.495482731495505}, 
       {8.46488785301654, -4.462009461095579}, 
       {8.52287961386843, -4.433013579920662}, 
       {8.57403199155125, -4.407437387989655}, 
       {8.61978936630024, -4.384558708128182}, 
       {8.66118195670343, -4.363862398254392}, 
       {8.69897043863028, -4.344968317900754}, 
       {8.73373247807502, -4.327587072718434}, 
       {8.76591710417686, -4.311495051337462}, 
       {8.79588027792068, -4.296512708634719}, 
       {8.8239089580915, -4.282504642239027}, 
       {8.85023785849377, -4.269332579711852}, 
       {8.8750614081565, -4.256965537118336}, 
       {8.89854247352923, -4.245081663643741}, 
       {8.92081884081126, -4.234049101954529}, 
       {8.94200811506438, -4.223352337539367}, 
       {8.96221147859191, -4.21325697555499}, 
       {8.97197130535272, -4.208090422527625}, 
       {8.98151661318835, -4.203188030580497}, 
       {8.98181154972185, -4.203696616747918}, 
       {8.98210628609501, -4.204537251233355}, 
       {8.98240082257934, -4.203710958763514}, 
       {8.98269515944578, -4.20281265978574}, 
       {8.98298929696471, -4.201039146701655}, 
       {8.98328323540599, -4.201628888638553}, 
       {8.98357697503891, -4.203218837804534}, 
       {8.98387051613223, -4.203039290951132}, 
       {8.98416385895414, -4.202495710996705}, 
       {8.98445700377231, -4.202487829097581}, 
       {8.98474995085386, -4.20305897350045}, 
       {8.98504270046538, -4.202758563358999}, 
       {8.9853352528729, -4.20200470571998}, 
       {8.98562760834193, -4.201445612774138}, 
       {8.98591976713744, -4.202660327227029}, 
       {8.98621172952386, -4.201332912973526}, 
       {8.9865034957651, -4.201915240991792}, 
       {8.98679506612453, -4.201356732318358}, 
       {8.98708644086498, -4.201693584763646}, 
       {8.98737762024877, -4.201494581420987}, 
       {8.98766860453768, -4.201623189396681}, 
       {8.98795939399297, -4.200763742222393}, 
       {8.98824998887537, -4.199814746419963}, 
       {8.9885403894451, -4.19963376943622}, 
       {8.98883059596184, -4.201169869081674}, 
       {8.98912060868477, -4.198180075525925}, 
       {8.98941042787253, -4.201642870378618}, 
       {8.98970005378325, -4.198527008974704}, 
       {8.98998948667456, -4.198781410652222}, 
       {8.99027872680356, -4.198505700313879}, 
       {8.99056777442682, -4.201640635864229}, 
       {8.99085662980044, -4.198448144125486}, 
       {8.99114529317997, -4.198318149818378}, 
       {8.99143376482047, -4.198797801592401}, 
       {8.9917220449765, -4.198602182826829}, 
       {8.99201013390208, -4.197988186881786}, 
       {8.99229803185077, -4.198823261751098}, 
       {8.99258573907559, -4.200446343612906}, 
       {8.99287325582908, -4.197984634515303}, 
       {8.99316058236326, -4.201550279009771}, 
       {8.99344771892966, -4.198011441703729}, 
       {8.99373466577931, -4.198996704160168}, 
       {8.99402142316275, -4.195874550037945}, 
       {8.99430799133002, -4.19689709198631}, 
       {8.99459437053065, -4.19853289159005}, 
       {8.99488056101371, -4.197094947632624}, 
       {8.99516656302773, -4.19528984039897}, 
       {8.9954523768208, -4.195271009623968}, 
       {8.99573800264049, -4.196549724562075}, 
       {8.99602344073388, -4.197040492114469}, 
       {8.99659375472773, -4.196483651471993}, 
       {8.99687863111993, -4.195630172196073}, 
       {8.99716332076933, -4.195275774128798}, 
       {8.99744782392062, -4.196349368758819}, 
       {8.99773214081797, -4.195452093777483}, 
       {8.99801627170509, -4.195639986466154}, 
       {8.99830021682522, -4.194807934124988}, 
       {8.9985839764211, -4.196787855293833}, 
       {8.99886755073502, -4.196211135551781}, 
       {8.99915094000877, -4.195225346385531}, 
       {8.99943414448369, -4.194845219774552}, 
       {8.99971716440064, -4.195872712456266}, {9., -4.19578801557103}}]}}}, 
  {PlotRange -> All, DisplayFunction -> 
    (Block[{System`Private`file = First[OpenTemporary[]]}, 
       Display[{$Display, System`Private`file}, #1]; 
        Close[System`Private`file]; 
        Run[System`Private`$OLString, System`Private`file]; #1] & ), 
   PlotRange -> 
    {{7.78481041988272, 9.02963877024676}, 
     {-4.802165772679304, -4.17999432830659}}, 
   AxesOrigin -> {7.78481041988272, -4.802165772679304}, 
   PlotRange -> Automatic, AspectRatio -> GoldenRatio^(-1), 
   DisplayFunction :> Identity, ColorOutput -> Automatic, Axes -> Automatic, 
   AxesOrigin -> Automatic, PlotLabel -> None, AxesLabel -> None, 
   Ticks -> {LogScale, LogScale}, 
   GridLines -> {First /@ LogScale[#1, #2] & , First /@ LogScale[#1, #2] & }, 
   Prolog :> {}, Epilog -> {}, AxesStyle -> Automatic, 
   Background -> Automatic, DefaultColor -> Automatic, 
   DefaultFont :> $DefaultFont, RotateLabel -> True, Frame -> True, 
   FrameStyle -> Automatic, FrameTicks -> 
    {LogScale, LogScale, LogScale, LogScale}, FrameLabel -> None, 
   PlotRegion -> Automatic}]


  • Prev by Date: Re: CHAOS & MATH
  • Next by Date: Re: Re: Calling functions before loading the package
  • Previous by thread: Re: Linearization of a system of differential equations
  • Next by thread: Re: GridLines in LogLogPlot