Re: help
- To: mathgroup at smc.vnet.net
- Subject: [mg21008] Re: [mg20934] help
- From: "David Park" <djmp at earthlink.net>
- Date: Thu, 2 Dec 1999 21:41:21 -0500 (EST)
- Sender: owner-wri-mathgroup at wolfram.com
>Anybody know that mathematica can plot many plots which is two variables one
>time?like as following:
>
>A={-1,0,1},B={-1,1,2},C{0,1,2}and I want to plot Ax+By=C by Mathematica?
>
>Anyone ccan help me?
>Thanks!!!
>
>
a = {-1, 0, 1};
b = {-1, 1, 2};
c = {0, 1, 2};
eqns = MapThread[#1 x + #2 y == #3 &, {a, b, c}]
{-x - y == 0, y == 1, x + 2 y == 2}
Needs["Graphics`ImplicitPlot`"]
Needs["Graphics`Colors`"]
ImplicitPlot[eqns, {x, -5, 5}, {y, -5, 5}, PlotStyle -> {Black, Red, Blue}];
David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/