Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2006
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2006

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

Search the Archive

Re: Plot equations and inequalities together

  • To: mathgroup at smc.vnet.net
  • Subject: [mg65303] Re: Plot equations and inequalities together
  • From: "hanspi" <hanspi at schmid-werren.ch>
  • Date: Sat, 25 Mar 2006 05:17:38 -0500 (EST)
  • References: <e0020g$plk$1@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

I would write y==15 as

Abs[y-15] < 0.1

or another small number of your choice that looks good on the resulting
plot.

InequalityPlot[(Abs[x - 5] < 0.1 && Abs[y - 10] < 0.1) ||
     (x > 5 && Abs[y - 5] < 0.1), {x, 0, 10}, {y, 0, 20}]

Kind regards,
Hanspeter


  • Prev by Date: Re: sorting list of roots af a transcendental function
  • Next by Date: Plot equations and inequalities together
  • Previous by thread: Plot equations and inequalities together
  • Next by thread: Plot equations and inequalities together