MathGroup Archive 2003

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

Search the Archive

problems with mathematica plot command

  • To: mathgroup at smc.vnet.net
  • Subject: [mg41098] problems with mathematica plot command
  • From: DuncanTKD at aol.com
  • Date: Fri, 2 May 2003 03:59:53 -0400 (EDT)
  • Sender: owner-wri-mathgroup at wolfram.com

I am a Math student at belhaven college in MS, and I am taking a class called mathematical investigation that uses mathematica to solve different calculus problems.  I am having trouble with the plot command.  It keeps giving me an machin-sized error message.  any help you can giv me is welcome.

In[32]:=
Clear[P,M,t,e,P0,b,q];
P[t_,e_,P0_,M_,b_,q_]=(P[t]/.answerRule/.Exp[r_+Log[e_]]:>s Exp[r])
Out[32]=
\!\(\(-\(\(E\^\(b\ t\)\ M\ \((b - e\ q)\)\)\/\(\(-b\)\ E\^\(b\ t\) + 
          E\^\(e\ q\ t + C[1]\)\)\)\)\)
No Harvesting
In[33]:=
e=0;P0=10000;M=30000;b=1.3;q=0;
In[37]:=
Print["M=",M,",P0=",P0,",b=",b];
Plot[P[t,e,P0,M,b,q],{t,1,9},PlotRange->{Automatic,{0,Automatic}},
  GridLines->Automatic,PlotStyle->{{AbsoluteThickness[2],RGBColor[1,0,0]}},
  AxesLabel->{"years","population"},PlotLabel->"No Harvesting"];


  • Prev by Date: Pan around a large graph?
  • Next by Date: Re: Changing String to Real
  • Previous by thread: Re: Re: Pan around a large graph?
  • Next by thread: RE: problems with mathematica plot command