MathGroup Archive 2006

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

Search the Archive

Re: Drawing function with 3 variables in a graph

  • To: mathgroup at smc.vnet.net
  • Subject: [mg71850] Re: Drawing function with 3 variables in a graph
  • From: dh <dh at metrohm.ch>
  • Date: Fri, 1 Dec 2006 06:21:52 -0500 (EST)
  • References: <ekmefu$8hs$1@smc.vnet.net>

Hi,
simply define a function of 3 variables. E.g.
g[x_] := Sin[x];
f[t_, a_, m_] := Exp[m g[a] t];
Plot[Evaluate[Table[f[t, a,m], {m, 0, 1, .25}, {a, 1, 3, 1}]], {t, 0,1}, 
PlotStyle -> Table[Hue[m a/4.], {m, 0, 1, .25}, {a, 1, 3, 1}]]

If you have too many functions in your plot, GraphicsArray or 
StackGraphics may come in handy. E.g StackGraphics:
<< Graphics`Graphics3D`
g[x_] := Sin[x];
f[t_, a_, m_] := Exp[m g[a] t];
g0 = {}; Do[AppendTo[g0, Plot[Evaluate[Table[f[t, a,
        m], {a, 1, 3, 1}]], {t, 0, 1}, PlotStyle -> Table[Hue[a/4.], {a, 
1, 3,
     1}]]]
   , {m, 0, 1, .25}];
Show[StackGraphics[g0]]
Daniel


royend at gmail.com wrote:
> I want to draw a fairly complex function several times in one graph. By
> using different colour I hope to present the development of my function
> as the three variables changes.
> 
> Earlier I have managed two variabels by using this:
> Plot[Evaluate[ { Table[ f[t,m], {m,0,5}] } ], {t,-20,20},
> PlotStyle->etc]
> 
> But this time I have met difficulties because one of my variables are
> "hidden" inside the function f(t,m), like this:
> g(a) = a/2
> f(t) = m*g(a)^t
> m,a and t are variables.
> 
> Therefore I need to control 3 variables and have tried this:
> With[ {a=5}, Plot[ same as above]....
> 
> I have read some about lists, graphics and so on but still haven't been
> able to find any solution. 
> Do you have any tips for solving this?
> 


  • Prev by Date: Re: Strange empty set of solutions
  • Next by Date: RE: Drawing function with 3 variables in a graph
  • Previous by thread: Re: Drawing function with 3 variables in a graph
  • Next by thread: RE: Drawing function with 3 variables in a graph