Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2012

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

Search the Archive

DiagramPlot and PlanarGraphPlot colors

  • To: mathgroup at smc.vnet.net
  • Subject: [mg128032] DiagramPlot and PlanarGraphPlot colors
  • From: "Dave Snead" <dsnead6 at charter.net>
  • Date: Mon, 10 Sep 2012 04:04:00 -0400 (EDT)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com
  • Delivered-to: l-mathgroup@wolfram.com
  • Delivered-to: mathgroup-newout@smc.vnet.net
  • Delivered-to: mathgroup-newsend@smc.vnet.net
  • References: <20120909213324.167C06765@smc.vnet.net>

Hi,

I'm showing two plots p1 and p2 on top of each other,
but I'd like to show them in two different colors,
say red and green.
Anybody know how to do this?

Here's the code with both plots in black:

Needs["ComputationalGeometry`"]
data2D = {{4.4, 14}, {6.7, 15.25}, {6.9, 12.8}, {2.1, 11.1}, {9.5, 
    14.9}, {13.2, 11.9}, {10.3, 12.3}, {6.8, 9.5}, {3.3, 7.7}, {0.6, 
    5.1}, {5.3, 2.4}, {8.45, 4.7}, {11.5, 9.6}, {13.8, 7.3}, {12.9, 
    3.1}, {11, 1.1}};
p1 = DiagramPlot[data2D]
p2 = PlanarGraphPlot[data2D]
Show[{p1, p2}]

Thanks in advance,
Dave




  • Prev by Date: Re: VertexLabeling in GraphPlot
  • Next by Date: Re: FrontEnd: Rotation of "heavy" graphics objects
  • Previous by thread: How to simplify certain covariance expressions using
  • Next by thread: Re: How to simplify certain covariance expressions using