       Re: FindMinimum Problem

• To: mathgroup at smc.vnet.net
• Subject: [mg44618] Re: FindMinimum Problem
• From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
• Date: Tue, 18 Nov 2003 06:41:47 -0500 (EST)
• Organization: Universitaet Leipzig
• References: <bpa1rv\$19t\$1@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

```Hi,

you ust make a function

foo[x_?NumericQ]:=x^2-a*x/.NDSolve[{a'[z]==x*z,a==1},a,{z,0,1}]

FindMinimum[foo[x],{x,-1,1}]

Regards
Jens

Jiang Xiao wrote:
>
> Hi, all,
>     recently I am dealing with a problem as following, findminimum(over x)
> of a function f[a,x], where a[z] satisfies a differential equation
> a'[z]=x*z say. The code is like:
> FindMinimum[x^2-a*x/.NDSolve[{a'[z]==x*z,a==1},a,{z,0,1}],{x,-1,1}]
>
> the problem is that I can do it in mathematica 4.2, but can't in mathematica
> 5.0 now. Do anybody where is the problem?
>
> thanks,
>
> Jiang

```

• Prev by Date: Re: filled plot on part of x-interval
• Next by Date: Re: Improper integral
• Previous by thread: FindMinimum Problem
• Next by thread: Re: FindMinimum Problem