MathGroup Archive 2005

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

Search the Archive

Re: Area Under Curve (Min Length Interval)


My (stupid!) calculus-less solution can be corrected this way :

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

Out[5]=
{0.5, 10.5, 0.000122635}

not so far from the exact solution...

v.a.


  • Prev by Date: Product {for p=2 to infinity} (p^2+1)/(p^2-1)
  • Next by Date: dividing numbers
  • Previous by thread: Re: Area Under Curve (Min Length Interval)
  • Next by thread: Re: Area Under Curve (Min Length Interval)