Re: Plot-Function
- To: mathgroup at smc.vnet.net
- Subject: [mg31174] Re: Plot-Function
- From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
- Date: Tue, 16 Oct 2001 01:18:50 -0400 (EDT)
- Organization: Universitaet Leipzig
- References: <9qbhor$2co$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Hi,
MultiplePlot[f_List, ranges : {{_, _?NumericQ, _?NumericQ} ..}, opts___]
/;
Length[f] == Length[ranges] :=
Module[{grs},
Block[{$DisplayFunction = Identity},
grs = Plot[Evaluate[Sequence @@ #, opts]] & /@ Transpose[{f,
ranges}]
];
Show @@ grs
]
Regards
Jens
"M. Kohler" wrote:
>
> Hi,
>
> in Mathematica,
> I've got two functions (f1 and f2).
>
> Is it possible to plot the first function (f1) from x = 0 to 3 and the second
> one from x = 3 to 6 in _one_ Graphic?
>
> Thanks for answering.
> Mathias
> --
> __________________________________________________________
> News suchen, lesen, schreiben mit http://newsgroups.web.de