Trigonometric Substitution

E.G. Find the area of a circle of radius 2 units.

solution : this is easy, simply find [Maple Math] since [Maple Math] is one half (the top half) of a unit circle (see below!). The only trouble is: what the heck is an antiderivative of [Maple Math] ? Not so easy!

> plot(sqrt(4-x^2),x=-2..2,title=`sqrt(4-x^2)`,thickness=2);

[Maple Plot]

It would be easy if we could make the [Maple Math] under the radical sign into a perfect square since we could then simply take the square root and be done with the nasty square root sign. This would happen if [Maple Math] became [Maple Math] because then we would get [Maple Math] which would turn into [Maple Math] .

> I1:=2*Int(sqrt(4-x^2),x=-2..2);with(student):

[Maple Math]

> I2:=changevar(x=2*sin(theta),I1,theta);

[Maple Math]

> value(I2);

[Maple Math]

Here's T.M.G.A. of [Maple Math] :

> int(sqrt(4-x^2),x);

[Maple Math]

Trigonometric Substitutions

The substitution used above is an example of trig substitution . It is not the same as the earlier type of substitution or change of variable technique. Then the substituion was of the form [Maple Math] where [Maple Math] as opposed to trig substitution which is of the form [Maple Math] , [Maple Math] (and depends on the function f being one-to-one so it has an inverse so that [Maple Math] . For this reason, trig substitution could be called inverse substitution )

The trigonometric Pythagorean Identity, [Maple Math] in its three equivalent foms (all of which involve perfect squares ) are what motivate the three trigonometric substitutions listed in the table below.

[Maple Math] [Maple Math] [Maple Math]
[Maple Math] [Maple Math] [Maple Math]
[Maple Math] [Maple Math] [Maple Math]
[Maple Math] [Maple Math] [Maple Math]

In the following three examples you will see each form. I'll give you the trigonometrically transformed integral and Maple's version of an antiderivative of the original integrand.

first form: [Maple Math]

> I1:=Int(x^3*sqrt(9-x^2),x);I2:=changevar(x=3*sin(theta),I1,theta);

[Maple Math]

[Maple Math]

> value(I1);

[Maple Math]

second form: [Maple Math]

> I1:=Int(1/(x*sqrt(x^2+3)),x);I2:=changevar(x=sqrt(3)*tan(theta),I1,theta);value(I1);

[Maple Math]

[Maple Math]

[Maple Math]

Now, the Maple answer involves something unfamiliar called the inverse hyperbolic tangent function. The answer I get by hand is [Maple Math]

> Me:=-sqrt(3)/3*ln(abs(sqrt((x^2+3))/x+sqrt(3)/x));Maple:=value(I1);

[Maple Math]

[Maple Math]

> simplify((Me-Maple));evalf(subs(x=1.3,Me-Maple));

[Maple Math]

[Maple Math]

third form: find the area under y = [Maple Math] above [Maple Math] .

This is not quite one of the forms in the table. If you observe though that we would like [Maple Math] to become [Maple Math] (why??) you will see that the appropriate substitution is obtained from letting [Maple Math] i.e. [Maple Math] .

> plot(sqrt(9*x^2-4)/x,x=0..2);

[Maple Plot]

> I1:=Int(sqrt(9*x^2-4)/x,x=2/3..2*sqrt(2)/3);I2:=changevar(x=2/3*sec(theta),I1,theta);

[Maple Math]

[Maple Math]

> value(I1);evalf(%);

[Maple Math]

[Maple Math]

Two that look different.

1.

> I1:=Int(1/sqrt(9*x^2+6*x-8),x);

[Maple Math]

This one looks impossible until you complete the square under the radical sign by realizing that [Maple Math] = [Maple Math] . We then get a manageable form by letting [Maple Math] See the two big steps below (you fill in the blanks):

> I2:=simplify(changevar(w=x+1/3,I1,w));

[Maple Math]

> I3:=changevar(w=sec(theta),I2,theta);

[Maple Math]

> value(I1);

[Maple Math]

2. [Maple Math]

> I1:=Int(exp(1)^t*sqrt(9-exp(1)^(2*t)),t);

[Maple Math]

> I2:=changevar(u=exp(1)^t,I1,u);

[Maple Math]

> I3:=simplify(%);

[Maple Math]

> I4:=value(I3);

[Maple Math]

> answer1:=subs(u=exp(1)^t,I4);

[Maple Math]

answer1 above is what you get by hand . If all you know is Maple then you will get the answer below:

> Int(exp(1)^t*sqrt(9-exp(1)^(2*t)),t)=int(exp(1)^t*sqrt(9-exp(1)^(2*t)),t);;

[Maple Math]

#37 page 489

Find the area bounded by [Maple Math] and [Maple Math] .

> bottom:=2-x;top:=x^2*sqrt(4-x^2);

[Maple Math]

[Maple Math]

> plot({top,bottom},x=-2..2,colour=[black,magenta],thickness=2);

[Maple Plot]

> top-bottom;

[Maple Math]

> intercepts:=evalf(solve(top-bottom));

[Maple Math]

> area:=Int(top-bottom,x=intercepts[4]..intercepts[3]);

[Maple Math]

> value(area);

[Maple Math]