Re: Re: Integrating over a Minimum

• To: mathgroup at smc.vnet.net
• Subject: [mg32986] Re: [mg32980] Re: [mg32946] Integrating over a Minimum
• From: BobHanlon at aol.com
• Date: Sat, 23 Feb 2002 02:38:03 -0500 (EST)
• Sender: owner-wri-mathgroup at wolfram.com

```In a message dated 2/22/02 3:30:56 AM, tgarza01 at prodigy.net.mx writes:

>I take the example you give. Try NIntegrate instead of Integrate:
>
>In[1]:=
>NIntegrate[Min[x, y], {y, 0, 1}, {x, 0, 1}]
>Out[1]=
>0.33333
>
>I quote from the Help Browser: "Integrate can evaluate integrals of rational
>functions. It can also evaluate integrals that involve exponential,
>logarithmic, trigonometric and inverse trigonometric functions, so long
>as
>the result comes out in terms of the same set of functions." If you're
>interested in numerical results - which I assume is the case - I think
>you
>can successfully use NIntegrate. Another example:
>
>In[1]:=
>f[x_, y_] := x + y /; 0 <= x <= 1 && 0 <= y <= 1;
>f[x_, y_] := x + 2*y /; x >= 1 || y >= 1;
>
>In[2]:=
>NIntegrate[f[x, y], {x, 0, 2}, {y, 0, 2}]
>Out[2]=
>11.5
>

Alternatively, break the integral into segments:
0<=x<=y and y<=x<=1

Integrate[x, {y,0,1}, {x,0,y}] + Integrate[y, {y,0,1}, {x,y,1}]

1/3

Bob Hanlon
Chantilly, VA  USA

```

• Prev by Date: Re: Mean
• Next by Date: Re: Mean
• Previous by thread: Re: Integrating over a Minimum