MathGroup Archive 2005

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

Search the Archive

Re: Area Under Curve (Min Length Interval)

  • To: mathgroup at smc.vnet.net
  • Subject: [mg53897] Re: Area Under Curve (Min Length Interval)
  • From: "Valeri Astanoff" <astanoff at yahoo.fr>
  • Date: Wed, 2 Feb 2005 18:10:38 -0500 (EST)
  • References: <ctqdm2$sd3$1@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

An exhaustive search seems better than NMinimize :

In[1]:=
<<Statistics`

In[2]:=
F[x_]:=CDF[ChiSquareDistribution[5],x];

In[3]:=
db=0.1;
bmax=b /. FindRoot[F[b] == 0.999,{b,10}]

Out[4]=
20.515

In[5]:=
First@Sort[
Table[{a,b,Abs[F[b]-F[a]-0.93]},{a,0,bmax,db},{b,a,bmax,db}]//
Flatten[#,1]&,#1[[3]]<#2[[3]]&]
Out[5]=
{1.3, 16.8, 0.0000365345}


  • Prev by Date: marching Squares Algorithm
  • Next by Date: Problem with matching.
  • Previous by thread: Re: Re: Area Under Curve (Min Length Interval)
  • Next by thread: Re: Area Under Curve (Min Length Interval)