MathGroup Archive 2008

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

Search the Archive

Constraint visualization

  • To: mathgroup at smc.vnet.net
  • Subject: [mg85767] Constraint visualization
  • From: NeilJ <neiljac at gmail.com>
  • Date: Thu, 21 Feb 2008 18:04:02 -0500 (EST)

Hallo,

I am brand new to Mathematica. I have acquired the program to assist
me in constraints/solution space visualization but the results I got
from my fiddling the past two weeks have been fairly disappointing. (I
must admit that I've elarnt a lot of wonderful new things but I am
still unable to carry out my initial objective.)

If I can find out how to color all the faces/edges of the following
regionplot it will help me a lot.

RegionPlot3D[
 Or[And[And[And[Fm <= 120/(8 - y), 8 - y >= 0],
    Or[And[Fm <= 69.6/(2.4 + 2 x), x >= 0],
     And[Fm <= 69.6/(2.4 - 2 x), x <= 0]]],
   And[Or[And[Fm <= 69.6/(2.4 + 2 x), x >= 0],
     And[Fm <= 69.6/(2.4 - 2 x), x <= 0]], And[Fm <= 112/y, y > 0]]],
  And[And[Fm <= 120/(8 - y), y < 0],
   Or[And[Fm <= 69.6/(2.4 + 2 x), x >= 0],
    And[Fm <= 69.6/(2.4 - 2 x), x <= 0]]],
  And[And[Fm <= 112/y, y > 8],
   Or[And[Fm <= 69.6/(2.4 + 2 x), x >= 0],
    And[Fm <= 69.6/(2.4 - 2 x), x <= 0]]]], {x, -2.6, 2.6}, {y, -3,
  9.6}, {Fm, 0, 30}]

Neil Jacobs


  • Prev by Date: DE with variable point boundary condition
  • Next by Date: Re: Vector file out of Mathematica?
  • Previous by thread: Re: DE with variable point boundary condition
  • Next by thread: Re: Constraint visualization