Re: Plotting a series of piecewise functions
- To: mathgroup at smc.vnet.net
- Subject: [mg88973] Re: Plotting a series of piecewise functions
- From: dh <dh at metrohm.ch>
- Date: Thu, 22 May 2008 06:16:02 -0400 (EDT)
- References: <g11r06$a7i$1@smc.vnet.net>
Hi Claus, a simple If statement will do it. Further, you haf a syntax error, confusing x0 and xo: f[lambda_,xo_,x_]:=If[x<x0,0,lambda*Exp[-lambda*(x-xo)]]; Plot[Evaluate[Flatten@Table[f[lambda,x0,x],{lambda,0.5,0.5},{x0,4}]],{x,0,10}] hope this helps, Daniel Claus wrote: > Hi, > I want to plot a series of functions. Namely I want to plot a series of > 2-parametric exponential distribution functions. By series I mean the > graphs for various xo values on one plot. > So, > the function looks like this: > > f[lambda_, xo_, x_]:=lambda*Exp[-lambda*(x-xo)] > > Now I can plot this (wrongly) with > > Plot[Evaluate[Table[f[lambda,xo,x],{lambda,0.5,0.5},{x0,4}]],{x,0,10}] > > The problem is that, really, f should be zero for x<xo. > I can plot one graph (for xo=1 and lambda=1) like this: > > Plot[Piecewise[{{f[0.5,1,x],x>1},{0,x<1}}],{x,0,10}] > > Now, how could I plot a series of plots (for different xo) on one chart > similarly to the Piecwise approach (can I do it with Piecewise at all, > or do I need an If clause of sorts)? > > Thank you for your help, > Claus > -- Daniel Huber Metrohm Ltd. Oberdorfstr. 68 CH-9100 Herisau Tel. +41 71 353 8585, Fax +41 71 353 8907 E-Mail:<mailto:dh at metrohm.com> Internet:<http://www.metrohm.com>