Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2004
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2004

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

Search the Archive

Re: Listplot-Bug in Mathematica 5.0

  • To: mathgroup at smc.vnet.net
  • Subject: [mg50076] Re: [mg50046] Listplot-Bug in Mathematica 5.0
  • From: "David Park" <djmp at earthlink.net>
  • Date: Sat, 14 Aug 2004 01:50:27 -0400 (EDT)
  • Sender: owner-wri-mathgroup at wolfram.com

Robert,

There are only 6 different points in your list.

Union[swk]
{{3760.115070521656, -0.03392142349257811},
  {3772.3106972498817, -0.01659087526212362},
  {3784.810127932071, -0.012419680497015643},
  {3797.309558614259, -0.02261413419318535},
  {3809.5051853424857, -0.002704921194676019},
  {3886.3245931593947, 0.03401050818985116}}

Why do you expect a different plot? You might, for example, plot the points
and make the point size depend on the number of cases for that point.

swk2 = {Length[#], First[#]} & /@ Split[swk];

Show[Graphics[
      {{AbsolutePointSize[2 First[#]], Point@Last[#]} & /@ swk2}],
    PlotRange -> {-0.04, 0.04},
    Frame -> True,
    ImageSize -> 400];

David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/


-----Original Message-----
From: Robert Zierer [mailto:robertzierer at yahoo.com]
To: mathgroup at smc.vnet.net
Subject: [mg50076] [mg50046] Listplot-Bug in Mathematica 5.0


Hello,

I think I found a bug in Mathematica 5.0.0.0. The following code
didn't behave as expected (delete the "`" and the "\\"):

swk = {{3760.115070521656`, -0.03392142349257811`}, {
        3772.3106972498817`, -0.01659087526212362`},
{3772.3106972498817`, \
-0.01659087526212362`}, {
        3772.3106972498817`, -0.01659087526212362`},
{3772.3106972498817`, \
-0.01659087526212362`}, {
        3772.3106972498817`, -0.01659087526212362`},
{3772.3106972498817`, \
-0.01659087526212362`}, {
        3772.3106972498817`, -0.01659087526212362`},
{3772.3106972498817`, \
-0.01659087526212362`}, {
        3772.3106972498817`, -0.01659087526212362`},
{3772.3106972498817`, \
-0.01659087526212362`}, {
        3784.810127932071`, -0.012419680497015643`},
{3784.810127932071`, \
-0.012419680497015643`}, {
        3784.810127932071`, -0.012419680497015643`},
{3784.810127932071`, \
-0.012419680497015643`}, {
        3784.810127932071`, -0.012419680497015643`},
{3784.810127932071`, \
-0.012419680497015643`}, {
        3784.810127932071`, -0.012419680497015643`},
{3784.810127932071`, \
-0.012419680497015643`}, {
        3784.810127932071`, -0.012419680497015643`},
{3784.810127932071`, \
-0.012419680497015643`}, {3797.309558614259`, -0.02261413419318535`},
\
{3797.309558614259`, -0.02261413419318535`}, {3797.309558614259`, \
-0.02261413419318535`}, {3797.309558614259`, -0.02261413419318535`}, \
{3797.309558614259`, -0.02261413419318535`}, {3797.309558614259`, \
-0.02261413419318535`}, {3797.309558614259`, -0.02261413419318535`}, \
{3797.309558614259`, -0.02261413419318535`}, {3797.309558614259`, \
-0.02261413419318535`}, {3797.309558614259`, -0.02261413419318535`}, \
{3809.5051853424857`, -0.002704921194676019`}, {3809.5051853424857`, \
-0.002704921194676019`}, {3809.5051853424857`,
-0.002704921194676019`}, \
{3809.5051853424857`, -0.002704921194676019`}, {3809.5051853424857`, \
-0.002704921194676019`}, {3809.5051853424857`,
-0.002704921194676019`}, \
{3809.5051853424857`, -0.002704921194676019`}, {3809.5051853424857`, \
-0.002704921194676019`}, {3809.5051853424857`,
-0.002704921194676019`}, \
{3886.3245931593947`, 0.03401050818985116`}};
ListPlot[swk,
    PlotJoined -> True,
    PlotStyle -> Hue[.9],
    Axes -> True,
    PlotLabel -> "Steigungswinkel",
    PlotRange -> All ];


Instead of plotting some step curve (some values of the list were
multiple), it plotted only parts of the list (only the first value in
a series of multiple values).
Any hints, bugfixes? Or am I wrong?

--
Robert Zierer




  • Prev by Date: Re: Listplot-Bug in Mathematica 5.0
  • Next by Date: Re: New user: Abs[] problem
  • Previous by thread: Re: Listplot-Bug in Mathematica 5.0
  • Next by thread: Optica question