Search All of the Math Forum:

Views expressed in these public forums are not endorsed by NCTM or The Math Forum.

Notice: We are no longer accepting new posts, but the forums will continue to be readable.

Topic: labeling clustered data
Replies: 3   Last Post: Jun 25, 2013 2:51 AM

 Search Thread: Advanced Search

 Messages: [ Previous | Next ]
 Bob Hanlon Posts: 906 Registered: 10/29/11
Re: labeling clustered data
Posted: Jun 23, 2013 10:48 PM
 Plain Text Reply

data = RandomReal[{}, {10, 2}];

Module[{n = 1},
ListPlot[data,
Epilog -> {
Text[n++, #, {-1, -1}] & /@
data},
PlotRange ->
{{-0.1, 1.1}, {-0.1, 1.1}},
Frame -> True, Axes -> False]]

Module[{n = 1},
ListPlot[FindClusters[data, 2],
Epilog -> {
Text[n++, #, {-1.5, -1.5}] & /@
data},
PlotMarkers -> Automatic,
PlotRange ->
{{-0.1, 1.1}, {-0.1, 1.1}},
Frame -> True, Axes -> False]]

Bob Hanlon

On Sat, Jun 22, 2013 at 8:46 PM, <ahmedco31@hotmail.com> wrote:

> Hi, I have a list of 2D points like this {{a,b},{x,y},...}, and I don't
> know how to plot them with labeled dots such that the first point labeled
> with number 1 and the second point labeled with 2, ...etc. Then I use the
> clustering function "FindClusters" to cluster the points into 2 groups, how
> can I plot the resulted list of two groups of points such that I keep the
> same labeling order?
>
> Thanks in advance
>
>

Date Subject Author
6/23/13 Bob Hanlon
6/25/13 W. Craig Carter

© The Math Forum at NCTM 1994-2018. All Rights Reserved.