Creating a Scatter Plot with Labeled Points

*To*: mathgroup at smc.vnet.net*Subject*: [mg127169] Creating a Scatter Plot with Labeled Points*From*: Mike McCraith <sandwaterhand at gmail.com>*Date*: Wed, 4 Jul 2012 03:29:28 -0400 (EDT)*Delivered-to*: l-mathgroup@mail-archive0.wolfram.com

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], Text[Style[ "(" && 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 "(" && S11Exercise64b...is 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 loops. Any help is always greatly appreciated. Thanks in advance! Mike

**Follow-Ups**:**Re: Creating a Scatter Plot with Labeled Points***From:*Bob Hanlon <hanlonr357@gmail.com>

**Re: Creating a Scatter Plot with Labeled Points***From:*Bob Hanlon <hanlonr357@gmail.com>

**Re: Creating a Scatter Plot with Labeled Points***From:*Tomas Garza <tgarza10@msn.com>