index.html

Wednesday, December 9, 2009
9:15 am
I want to see the graphs for the functions I evaluated this morning

In[2]:=

[Graphics:HTMLFiles/index_2.gif]

In[8]:=

Plot[((Sqrt[x + 4]) - (Sqrt[3x - 6]))/(x - 5), {x, 2, 10}, PlotStyleRed] ;

[Graphics:HTMLFiles/index_4.gif]

In[10]:=

Plot[(x - 64)/((x * 1/3) - 4), {x, -100, 100}, PlotStyleRed] ;

[Graphics:HTMLFiles/index_6.gif]

In[13]:=

Plot[(x - 64)/(((x * (1/3)) - 4)), {x, 50, 100}, PlotStyleRed] ;

[Graphics:HTMLFiles/index_8.gif]

I am suprised by this graph. I evaluated the limit of this function as x approaches 64 to be 48. Yet the graph suggests a value close to 0.

In[14]:=

Plot[(x - 64)/(((x * (1/3)) - 4)), {x, 50, 70}, PlotStyleRed] ;

[Graphics:HTMLFiles/index_10.gif]

In[15]:=

$Plot[(x - 64)/(x^(1/3) - 4), {x, 50, 100}, PlotStyleRed] ;$

[Graphics:HTMLFiles/index_12.gif]

Got it. The symbol for exponentiation is ^, not *.

In[19]:=

$Plot[(x - 64)/(x^(1/3) - 4), {x, 0, 100}, PlotStyleRed] ;$

[Graphics:HTMLFiles/index_14.gif]

Created by Mathematica (December 9, 2009)