MathGroup Archive 2003

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

Search the Archive

Re: FindMinimum

  • To: mathgroup at
  • Subject: [mg39594] Re: FindMinimum
  • From: "Dugmore Biyana" <DBiyana at>
  • Date: Tue, 25 Feb 2003 02:56:38 -0500 (EST)
  • Organization: Eastern Cape Technikon
  • Sender: owner-wri-mathgroup at

Hi Mathgroup!
I'm running a small Mathematica program that reads:
[Rest[index]] - Log[Drop[index,-1]]; v = FoldList[(omega+alpha*#2 + 
beta*#1)&,First[u]^2,Rest[u]^2]; -Fold[Plus,0,Log[v]+u^2/v]
I tried this code with Length[index]=240 (in reality 
Length[index]=2000)but execution went on and on for more a day 
without producing any results, except for a message 
FindMinimum::regex...., while still running. Can anyone help?
M D Biyana

  • Prev by Date: Hyberbolic icosahedron needed
  • Next by Date: Re: Comment lines in different colour or font
  • Previous by thread: Hyberbolic icosahedron needed
  • Next by thread: Re: Re: FindMinimum