Why is ListLogPlot skipping entire decades? - Mathematica Stack Exchange most recent 30 from mathematica.stackexchange.com 2019-10-14T00:07:02Z https://mathematica.stackexchange.com/feeds/question/48367 https://creativecommons.org/licenses/by-sa/4.0/rdf https://mathematica.stackexchange.com/q/48367 2 Why is ListLogPlot skipping entire decades? QuantumCakes https://mathematica.stackexchange.com/users/13960 2014-05-22T19:04:51Z 2014-05-22T20:00:59Z <p>I'm having an issue with Mathematica wherein, when trying to use ListLogPlot, the scale of the y-axis skips entire decades. Instead of 1, 10, 100, 1000, it goes more like 10^2,10^4,10^6,10^8. I need it to, well, not do this.</p> <p>This is more or less my code, with different numbers introduced (although same order of magnitude)</p> <pre><code>data1 = {{{1, 1.432*10^8}, {2, 4.2*10^7}, {5., 1.68*10^7}, {7., 5.21*10^6}, {10., 1.02*10^6}, {12., 5.37*10^5.}, {15., 1.76*10^5.}, {17., 1.40*10^5.}, {20., 7.87*10^4}}} </code></pre> <p>Then</p> <pre><code>ListLogPlot[data1, Joined -&gt; True, PlotMarkers -&gt; {Automatic, Tiny}, PlotStyle -&gt; Red, PlotRange -&gt; {{0, 20}, {1, 1000000000}}, AspectRatio -&gt; 1, Frame -&gt; True] </code></pre> <p>And, at least for mine, it produces a graph wherein the ticks on the vertical log axis skip decades. </p> <p>There should also be a large white blank space towards the bottom of the graph. This is intentional, as I have several other sets of data I need to include using the Show function, and Show seems to default to the first graph set. So if I can get this graph to work, then it should be pretty easy to graph the others, and use the Show function.</p> <p>Any help is greatly appreciated.</p> https://mathematica.stackexchange.com/questions/48367/-/48373#48373 4 Answer by george2079 for Why is ListLogPlot skipping entire decades? george2079 https://mathematica.stackexchange.com/users/2079 2014-05-22T19:39:34Z 2014-05-22T20:00:59Z <p>you need to manually specify <code>FrameTicks</code> to override the default.</p> <pre><code> ListLogPlot[data1, Joined -&gt; True, PlotMarkers -&gt; {Automatic, Tiny}, PlotStyle -&gt; Red, PlotRange -&gt; {{0, 20}, {1, 1000000000}}, AspectRatio -&gt; 1, Frame -&gt; True, FrameTicks -&gt; {Automatic, Table[{10^i, Superscript[10, i] }, {i, 0, 10}], None, None}] </code></pre> <p><img src="https://i.stack.imgur.com/qGcRN.png" alt="enter image description here"></p> <p>adding the sub ticks..</p> <pre><code> ListLogPlot[data1, Joined -&gt; True, PlotMarkers -&gt; {Automatic, Tiny}, PlotStyle -&gt; Red, PlotRange -&gt; {{0, 20}, {1, 1000000000}}, AspectRatio -&gt; 1, Frame -&gt; True, FrameTicks -&gt; {Automatic, Table[{10^i, Superscript[10, i], {.02, 0}}, {i, 0, 10}]~Join~ Flatten[ Table[{j 10^i, , {.005, 0}}, {i, 0, 10}, {j, 2, 9 }], 1], None, None}] </code></pre> <p><img src="https://i.stack.imgur.com/AhBTp.png" alt="enter image description here"></p>