MathGroup Archive 2007

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: A wrong definite integral in 5.0?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg77250] Re: A wrong definite integral in 5.0?
  • From: dimitris <dimmechan at yahoo.com>
  • Date: Wed, 6 Jun 2007 06:56:15 -0400 (EDT)
  • References: <f43hau$301$1@smc.vnet.net>

Hello.

$VersionNumber
5.2

In[214]:=
Integrate[Log[1 - 4*x*(1 - x)], {x, 0, 1}]
Out[214]=
-2

correct as you indicated.

But let see if your version 5 can give the correct result.
To this end I want you to try

In[37]:=
f[x_] = Log[1 - 4*x*(1 - x)]
F[x_] = Integrate[f[x], x]
(Limit[F[x], x -> 1, Direction -> 1] - Limit[F[x], x -> 1/2, Direction
-> -1]) +
  (Limit[F[x], x -> 1/2, Direction -> 1] - Limit[F[x], x -> 0,
Direction -> -1])

If the result is -2 then we finish.
If not please send to me the result of Integrate[Log[1 - 4*x*(1 -
x)],x]
in your version!

Dimitris


 /  bolud-el-kotur       :
> I get this result in version 5.0,
>
> >Integrate[Log[1 - 4 x(1 - x)], {x, 0, 1}]
> >-2 + I  Pi
>
> and the same thing if I "declare" the singularity with {x,0,1/2,1}.
>
> Another way to look at the problem is computing,
>
> >Integrate[Log[1 - 4 x(1 - x)], {x, 0, 1/2}]
> >-1
>
> and
>
> >Integrate[Log[1 - 4 x(1 - x)], {x, 1/2, 1}]
> >-1 + I Pi
>
> Since the integrand is symmetric about x=1/2, the result should have
> been the same one (-1) in both cases, and the integral over [0,1]
> should yield -2.
>
> A numerical approach,
>
> >NIntegrate[Log[1 - 4 x(1 - x)], {x, 0, 1/2, 1},
>   MaxRecursion -> 100, SingularityDepth -> 20]
> >-1.9999997086422834`
>
> gives the correct result, within the numerical accuracy required.



  • Prev by Date: Re: how to transform a list in a sequence of arguments?
  • Next by Date: Dynamic 2D plotting (V6) - Resend
  • Previous by thread: Re: A wrong definite integral in 5.0?
  • Next by thread: Re: Slow work of some List functions in Mathematica 6