Re: ListPlot skips first point
- To: mathgroup at smc.vnet.net
- Subject: [mg130879] Re: ListPlot skips first point
- From: "djmpark" <djmpark at comcast.net>
- Date: Thu, 23 May 2013 04:07:37 -0400 (EDT)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- Delivered-to: l-mathgroup@wolfram.com
- Delivered-to: mathgroup-outx@smc.vnet.net
- Delivered-to: mathgroup-newsendx@smc.vnet.net
- References: <13099671.83840.1369203781906.JavaMail.root@m06>
When I evaluate your statements (using Show) in M 9.0.1 on Windows the first point of data2 is plotted. The following is a more detailed plot using Presentations with the points shown and Tooltips on the data2 points, clearly showing that the first point is used. << Presentations` yticks = CustomTicks[Log, {-4, 3, {1.}, {2, 5}}]; Draw2D[ {ListLogDraw[data1, Joined -> True, PlotStyle -> Red], ListLogDraw[data2, Joined -> True, PlotStyle -> Blue], CirclePoint[{First[#], Log[Last[#]]}, 3, Black, White] & /@ data1, Tooltip[ CirclePoint[{First[#], Log[Last[#]]}, 3, Black, LightBlue], #] & /@ data2}, Frame -> True, FrameTicks -> {{yticks, yticks // NoTickLabels}, {Automatic, Automatic}}, PlotRange -> {{0, 20}, {Log[0.001], Log[100]}}, ImageSize -> 400] David Park djmpark at comcast.net http://home.comcast.net/~djmpark/index.html From: Themis Matsoukas [mailto:tmatsoukas at me.com] In the particular example below, the first point of data2 is *not* plotted. If I drop the last point of data2, then the first point comes into view. Not sure why. data1 = {{1, 11.07}, {120, 11.07}}; data2 = {{1, 11.07}, {2, 2.15}, {3, 0.83}, {4, 0.43}, {5, 0.26}, {6, 0.17}, {7, 0.12}, {8, 0.09}, {9, 0.07}, {10, 0.06}, {11, 0.05}, {12, 0.04}, {13, 0.03}, {14, 0.03}, {15, 0.03}, {16, 0.02}, {17, 0.02}, {18, 0.02}, {19, 0.02}, {20, 0.01}, {21, 0.01}, {22, 0.01}, {23, 0.01}, {24, 0.01}, {25, 0.01}, {26, 0.01}, {27, 0.01}, {28, 0.01}, {29, 0.01}, {30, 0.01}, {31, 0.01}, {32, 0.01}, {33, 0.01}, {34, 0.01}, {35, 0.01}, {36, 0.01}, {37, 0.01}, {38, 0.01}, {39, 0.01}, {40, 0.01}, {41, 0.01}, {42, 0.01}, {43, 0.01}, {44, 0.01}, {45, 0.01}, {46, 0.01}}; Show[ ListLogPlot[data1, PlotStyle -> Red, Joined -> True, PlotRange -> {{0, 20}, {0.001, 100}}], ListLogPlot[data2, PlotStyle -> Blue, Joined -> True] ] This is with v9 for the Mac.