Re: Parametric plot

*To*: mathgroup at smc.vnet.net*Subject*: [mg49217] Re: Parametric plot*From*: BobHanlon at aol.com*Date*: Thu, 8 Jul 2004 02:50:51 -0400 (EDT)*Sender*: owner-wri-mathgroup at wolfram.com

Needs["Graphics`"]; Off[InverseFunction::ifun,Solve::ifun,Solve::incnst]; With[{SO={1,20,100},Km = 10, Vmax=15}, m=Length[SO]; DisplayTogether[ Table[ ImplicitPlot[(SO[[n]]/Km)x-Log[1-x]==(Vmax/Km)t, {t,0,15}, AspectRatio->.75, PlotStyle->Hue[(n+m-2)/(2(m-1))]], {n,m}]]]; Bob Hanlon > In a message dated Wed, 7 Jul 2004 06:10:56 +0000 (UTC), > kaiowaa at bol.com.br writes:<BR><BR>A str batch reactor model following Michaelis-Menten > kinetics gives > the function: > (S0\Km)x - Log[1 - x] = (Vmax\Km) t > where x is the proportion of substrate converted, S0 is, say, 1, 20 > and 100 g/L, Km is 10 and Vmax is 15. > How to plot the curves (in the same graphic) for x varying from zero > to 1 against t (from zero to 15, with the given values? >