MathGroup Archive 2008

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

Search the Archive

How to connect one object to the other?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg88893] How to connect one object to the other?
  • From: "Gohar Sultan" <contact2gohar at gmail.com>
  • Date: Tue, 20 May 2008 06:53:29 -0400 (EDT)

i am using Mathematica 6 on Window XP

this code makes disk drag able disk objects, i want to connect them with
arrow, how con i achieve this, any ideas?

plotObject[G_] := Locator[{RandomReal[30], RandomReal[30]},
  Graphics[G], ImageSize -> 20]

p = {
  RGBColor[RandomReal[1], RandomReal[1], RandomReal[1], 0.5],
  Disk[{5, 5}, 5]
  }

Framed@Graphics[
  Table[plotObject[{RGBColor[RandomReal[1], RandomReal[1],
      RandomReal[1], 0.5], Disk[{5, 5}, 5]}], {i, 10}],
  PlotRange -> 50]




Thanks in advance,
Gohar Sultan



  • Prev by Date: Re: Filtering a list of list for certain elements that are neighbours
  • Next by Date: sending programatically output to clipboard
  • Previous by thread: Re: Mathematica 6: No more memory available problem with
  • Next by thread: Re: How to connect one object to the other?