Hi!
I am a begginer on Mathematica integrations then i want to test the plot of simple functions like exponentials.
I have a problem with the following code:
A[r_, c_] := Exp[-c r]
IntNum[r_?NumericQ, c_] := Integrate[A[t, c], {t, 0, r}]
IntAnal[r_, c_] := -(1/c) Exp[-c r]
Plot[{IntNum[r, 1], IntAnal[r, 1]}, {r, 0, 3}]
![]()
Plot Image: http://oi41.tinypic.com/2h3zh9i.jpg
I wonder understand why the two functions don't give same plot.
Thank you!
