MathGroup Archive 2012

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

Search the Archive

Creating a Scatter Plot with Labeled Points

Hello there.  I'm trying to graph a Scatter Plot based on a given list of
data and have the coordinates appear near the point.

I'm trying to save time and, instead of manually typing the text for the
coordinates, I'd like to be able to pull the coordinates from the list to
plot them point and list the text.  Here's what I have so far:

S11Exercise64b = {{0, 120}, {10, 119}, {20, 118}, {30, 117}, {40, 116},
{50, 115}, {60, 114}, {70, 113}, {80, 112}};
ListPlot[S11Exercise64b, AxesLabel -> {x, y}, AxesOrigin -> {0, 0},
 Epilog -> {Blue, PointSize[.02], Point[S11Exercise64b],
     "(" && S11Exercise64b[[1, 1]] && "," && S11Exercise64b[[1, 2]] && ")",
FontSize -> 18], {.9*S11Exercise64b[[1, 1]] + 30, .9*S11Exercise64b[[1, 2]]
+ .2}],

Please note, for this example, I am the first point (0, 120).

The line that begins with the "(" && my attempt to
extract the coordinates from the given list.  Thus, next to the point, it
should read (0,120).  However, I am getting ( ^ 0^, ^ 120 ^).  Basically,
my lack of knowledge concerning strings is one of my issues.

But, as you can see, once fixed, I'd have to create a Text[Style[ line for
every ordered pair that I have in the list.  Is there a way to automate
this process?  Again, a lack of know-how leads to now knowing how to do For

Any help is always greatly appreciated.

Thanks in advance!


  • Prev by Date: Re: Evaluate code fragment without making new cell
  • Next by Date: Re: case of inconsistent API between Drop and Part?
  • Previous by thread: Re: some Experience with webMathematica
  • Next by thread: Re: Creating a Scatter Plot with Labeled Points