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

Re: Labeling points

• To: mathgroup at smc.vnet.net
• Subject: [mg88750] Re: Labeling points
• From: Szabolcs Horvát <szhorvat at gmail.com>
• Date: Fri, 16 May 2008 05:27:30 -0400 (EDT)
• Organization: University of Bergen
• References: <g0h81q$mtp$1@smc.vnet.net>

AngleWyrm wrote:
> Here's a graphic I created for a discussion on game theory:
> http://home.comcast.net/~anglewyrm/thread/dps.png
> 
> I put the text next to the points in as a post-processing step by hand in 
> PhotoShop.
> 
> Is there a way to get mathematica to display such information? 

Here are some random points with labels:

points = Table[{RandomReal[1, 2], i}, {i, 10}]

If the graphic will be sent to people who have Mathematica 6, use Tooltip:

Graphics[Tooltip[Point[#1], #2] & @@@ points]

Otherwise you could use Text:

Graphics[{Point[#1], Text[#2, #1, {-3, 0}]} & @@@ points]