MathGroup Archive 2001

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

Search the Archive

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


  • Prev by Date: Re: data files
  • Next by Date: Parallel Processing
  • Previous by thread: Re: Plot-Function
  • Next by thread: Re: Plot-Function