Module 9 : Integral Calculus

902 : Interesting Integrals

P U R P O S E

The purpose of this project is to learn how to perform definite and indefinite integration using Maple, and to explore various properties and theorems of integrals.

__________________________________________________________________________________

A. Definite and Indefinite Integral

__________________________________________________________________________________

We define a function to use as a guinea pig.

> f := x -> .01*x^4 + 3 + sqrt(x) + 6/x^2 + x*sin(3*x);

f := proc (x) options operator, arrow; .1e-1*x^4+3+...

and graph it while marking off an area to compute

> plot( { f(x), [[1,0],[1,f(1)]], [[6,0],[6,f(6)]] }, x = 0..7, y = 5..20);

[Maple Plot]


With these commands we compute the indefinite integral. Note that the Int command only displays the integral without computing its value, while the int command computes the anti derivative.

> Int( f(x), x ); value(%); int( f(x), x );

Int(.1e-1*x^4+3+sqrt(x)+6/(x^2)+x*sin(3*x),x)

.2000000000e-2*x^5+3.*x+.6666666667*x^(3/2)-6./x+.1...

.2000000000e-2*x^5+3.*x+.6666666667*x^(3/2)-6./x+.1...

We can also compute the definite integral which represents area under the curve. Again, the Int command just sets it up, and the int command gets the numerical answer.

> Int( f(x), x = 1..6); value(%);
int( f(x), x = 1..6);

Int(.1e-1*x^4+3+sqrt(x)+6/(x^2)+x*sin(3*x),x = 1 .....

42.93153836

42.93153836

__________________________________________________________________________________

B. Linearity Properties

__________________________________________________________________________________

A process that takes T(aáf(x)) + bág(x)) to aáT(f(x)) + báT(g(x)) is called a linear transformation. The derivative is an example of a linear transformation. The integral is another example.

Lets define some functions, and explore the proposition that the integral of a sum is the sum of integrals :

[Maple Metafile]

> f := x -> x^3 + 10*x + 3;

f := proc (x) options operator, arrow; x^3+10*x+3 e...

> g := x -> sin(10*x);

g := proc (x) options operator, arrow; sin(10*x) en...

> Int( c*f(x), x = 0..14) : % = value(%);

Int(c*(x^3+10*x+3),x = 0 .. 14) = 10626*c

> c*Int( f(x), x = 0..14) : % = value(%);

c*Int(x^3+10*x+3,x = 0 .. 14) = 10626*c

The fact that the results are the same is an indication (but does not formally prove) that this proposition is valid.

Lets explore the proposition

[Maple Metafile]

> Int( f(x) + g(x), x) : % = value(%);

Int(x^3+10*x+3+sin(10*x),x) = 1/4*x^4+5*x^2+3*x-1/1...

> Int( f(x), x ) + Int( g(x), x ) : % = value(%);

Int(x^3+10*x+3,x)+Int(sin(10*x),x) = 1/4*x^4+5*x^2+...

The fact that the results are the same is an indication (but does not formally prove) that this proposition is valid.

__________________________________________________________________________________

C. Upper and Lower Bounds

__________________________________________________________________________________

An upper bound for a function is a constant M which the function never exceeds in a given interval : f(x) M. Similarly, a lower bound, m, for a function is a value which is never larger than the value of the function : m f(x) over some interval. There are many functions which are difficult or impossible to integrate. However, using the upper and lower bound of a function, we can get upper and lower bounds for an integral :

[Maple Metafile]

In the student package of commands, there are maximize and minimize commands which find the maximum and minimum value of a function over an interval.

> restart; with(student):

> g := x -> 1/3*x^3 - 7*x^2 + 35*x + 30;

g := proc (x) options operator, arrow; 1/3*x^3-7*x^...

> minimize( g(x), x=0..14); m := evalf(%);
maximize( g(x),x=0..14); M := evalf(%);

275+1/3*(7+sqrt(14))^3-7*(7+sqrt(14))^2+35*sqrt(14)...

m := 11.4111973

275+1/3*(7-sqrt(14))^3-7*(7-sqrt(14))^2-35*sqrt(14)...

M := 81.2554690

Here is snapshot of the situation.

> plot( { g(x), m, M}, x=0..14, y=0..90 );

[Maple Plot]

The horizontal lines indicate the minimum and maximum values. The value m(b-a) represents the area of the smaller rectangle which fits under the curve, and the value M(b-a) represents the larger rectangle which the curves fits within.

Lets now verify that

[Maple Metafile]

> Int( m, x=0..14): % = value(%);
Int( g(x),x=0..14): % = evalf(value(%));
Int( M, x = 0..14): % = value(%);

Int(11.4111973,x = 0 .. 14) = 159.7567622

Int(1/3*x^3-7*x^2+35*x+30,x = 0 .. 14) = 648.666666...

Int(81.2554690,x = 0 .. 14) = 1137.576566

Here you can see the min and max. Thus we have that m g(x) M for the interval. What can we say about the integral of g(x) if were not able to compute it directly?

__________________________________________________________________________________

D. The Absolute Value and Integrals

__________________________________________________________________________________

Lets explore the proposition that [Maple Metafile] and see why its true.

Let define a function as an example, and then compute each integral and see which one is larger.

> f := x -> x^3 - 10*x^2 + 20*x + 10;

f := proc (x) options operator, arrow; x^3-10*x^2+2...

Here is [Maple Metafile]

> Int( abs( f(x) ), x = -3..8): % = evalf( value(%));

Int(abs(x^3-10*x^2+20*x+10),x = -3 .. 8) = 132.9166...

and [Maple Metafile]

> abs( Int( f(x) , x = -3..8)): % = evalf( value(%));

-Int(x^3-10*x^2+20*x+10,x = -3 .. 8) = 132.9166667

The answers are different. If we look at the plot of each function we can see some clues as to why there is a difference.

> plot( f(x), x = -3..8, y = -15..25);

[Maple Plot]

> plot( abs(f(x)), x = -3..8, y = -15..25);

[Maple Plot]

__________________________________________________________________________________

E. The fundamental Theorem

__________________________________________________________________________________

One version of the Fundamental Theorem is that if [Maple Metafile] , then FÕ(x) = f(x). We begin be defining f(x), then define F(x) by way of an integral of f(x).

> f := x -> x^2 - 10*x + 30;

f := proc (x) options operator, arrow; x^2-10*x+30 ...

> F := x -> int( f(t), t = 0..x);

F := proc (x) options operator, arrow; int(f(t),t =...

Locate f(x) by noting the Y-intercept fo 30. The other graph is F(x) which is measuring the area under f(x).

> plot( { f(x), F(x) }, x = 0..10);

[Maple Plot]

Note that if we compute the derivative of F(x) we get f(x) as we should.

> F(x); diff( F(x), x);

1/3*x^3-5*x^2+30*x

x^2-10*x+30

>