Re: Plot a function with constants
- To: mathgroup at smc.vnet.net
- Subject: [mg36019] Re: [mg35998] Plot a function with constants
- From: Tomas Garza <tgarza01 at prodigy.net.mx>
- Date: Mon, 12 Aug 2002 03:34:36 -0400 (EDT)
- References: <200208110914.FAA10423@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
You have to somehow specify the values of your constants (unless you want to
go to a 3D graphic). One possibility would be as follows
In[1]:=
n[e_,b_,mu_]:=1/(Exp[b(e-mu)]+1);
In[2]:=
Plot[n[e, b, mu] /. {b -> 1, mu -> 1}, {e, 0, 10},
AxesLabel -> {"e", "n(e)"},
Epilog -> {Line[{{1, 0}, {1, n[1, 1, 1]}}],
Text["mu", {0.91, -0.02}]}];
Tomas Garza
Mexico City
----- Original Message -----
From: "Remi Dumas" <remi.dumas at club-internet.fr>
To: mathgroup at smc.vnet.net
Subject: [mg36019] [mg35998] Plot a function with constants
> I would like to plot this function :
> 1
> n(e)=______________
> Exp[b(e-mu)]+1
>
> and get a graphic like that, with the letters
>
> n(e)
> ^
> |
> |
> 1| ____________
> | \
> | \
> | |
> |_______________ \_____________________\ e
> mu
/
>
> how can i do it, i specified
> SetAttributes{b,constant} etc ... but it don't work
>
> please help me, i use mathematica 4
>
>
>
>
- References:
- Plot a function with constants
- From: "Remi Dumas" <remi.dumasNOSPAM@club-internet.fr>
- Plot a function with constants