Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2008

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

Search the Archive

Re: Labeling points

  • To: mathgroup at smc.vnet.net
  • Subject: [mg88754] Re: Labeling points
  • From: "David Park" <djmpark at comcast.net>
  • Date: Fri, 16 May 2008 05:28:16 -0400 (EDT)
  • References: <g0h81q$mtp$1@smc.vnet.net>

pointsandvalues = {{.5, 50, 50}, {1, 50, 75}, {1.5, 50, 88}, {2.0, 50,
    94}, {1.0, 100, 25}, {1.5, 100, 50}, {2.0, 100, 69}, {1.5, 150,
   13}, {2.0, 150, 31}, {2.0, 200, 6}}

Graphics[
 {AbsolutePointSize[4],
  Module[{loc = Part[#, {1, 2}], val = Part[#, 3]}, {Point[loc],
      Text[Row[{val, Spacer[2], "%"}], loc, {-1.8, 0}]}] & /@
   pointsandvalues},
 AspectRatio -> 1,
 Axes -> True, AxesOrigin -> {0, 0}, AxesLabel -> {"Time", "Damage"},
 ImageSize -> 300]

-- 
David Park
djmpark at comcast.net
http://home.comcast.net/~djmpark/


"AngleWyrm" <anglewyrm at yahoo.com> wrote in message 
news:g0h81q$mtp$1 at smc.vnet.net...
> 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?
>
>
> 



  • Prev by Date: Re: Re: export mathematica table to .mat (MATLAB) format.Please help!!!
  • Next by Date: Re: Multiple clipboards
  • Previous by thread: Re: Labeling points
  • Next by thread: DSolve question