Group Abstract Group Abstract

Message Boards Message Boards

0
|
11.8K Views
|
9 Replies
|
2 Total Likes
View groups...
Share
Share this post:

Calculate the double integral in polar coordinates

Posted 6 years ago
Attachment

Attachments:
POSTED BY: ajin mj
9 Replies
In[1]:= 1/\[Pi] Integrate[(x^2 + y^2) Boole[x^2 + y^2 <= 36], {x, 0, 
   6}, {y, -6, 0}]

Out[1]= 162
POSTED BY: Frank Kampas

Define

x = r Cos[t];
y = r Sin[t];

Then

x^2 + y^2 // Simplify

r^2

So your r is equal to 6.

Your constraints are fulfilled if 3Pi/2 <= t <= 2 Pi. Look for example at

Plot[{x /. r -> 1, y /. r -> 1.5}, {t, 0, 2 Pi}]

The Volumeelement in Polar Coordinates (in R2 ) is dV = r dr dt, so your integral is written as

In[68]:= 1 / Pi Integrate[ r^2  r , {r, 0, 6}, {t, 3 Pi/2, 2 Pi}]

Out[68]= 162

Obviously your integral "lives" on a disk with radius r. Then you can equally write y as function of x and your integral is as well

In[77]:= 1/Pi Integrate[ x^2 + y^2, {x, 0, 6}, {y, 0, Sqrt[36 - x^2]}]

Out[77]= 162
POSTED BY: Hans Dolhaine

That's not the correct syntax for entering an integral. Also, I don't understand why you're doing a maximization.

POSTED BY: Frank Kampas

Ok Frank, sorry! I attach the NMaximize.

Attachments:
POSTED BY: Frank Kampas

Why don't you follow your own suggestion (in the post title) and transform the problem into polar coordinates, which immediately gives:

Integrate[r^3/Pi, {r, 0, 6}] Pi/2
(*  Out:   162   *)

But if one hesitates to do any math one can choose the straightforward approach:

reg = ImplicitRegion[{x^2 + y^2 <= 36, x >= 0, y <= 0}, {x, y}];
Integrate[(x^2 + y^2)/Pi, {x, y} \[Element] reg]
(*  Out:   162   *)
POSTED BY: Henrik Schachner

use Boole[ ] to implement the constraint

POSTED BY: Frank Kampas
Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.
Reply Preview
Attachments
Remove
or Discard