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