MathGroup Archive 2008

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

Search the Archive

Re: Defining functions in mathematica

  • To: mathgroup at smc.vnet.net
  • Subject: [mg85597] Re: Defining functions in mathematica
  • From: dh <dh at metrohm.ch>
  • Date: Thu, 14 Feb 2008 06:29:18 -0500 (EST)
  • References: <fp0lhr$5ls$1@smc.vnet.net>


Hi,

try NMaximize. I think Maximize expects a symbolic expression in some 

variable.

hope this helps, Daniel



lederer at ssb.rochester.edu wrote:

> I am trying to maximize an interpolated function without success

> 

> Here is what I have tried:  first I defined the interpolated function

> 

> f= FunctionInterpolation[profit1[p1,p2,ab],{p1,0,2},{p2,0,2},{ab,0,2}]

> 

> To test this definition I try and see that   f[.1,.3,.4]  is evaluated

> properly.  It is properly evaluated as a  real number.

> 

> Then I try to find the x that Maximizes f

> 

> 

> Maximize[{ f[x, .2, .1], 0=98x=982] }, x]

> 

> 

> but what comes out is

> 

> Maximize[{InterpolatingFunction[{{0,2}{0,2},{0,2), etc.

> 

> Further when I try

> 

> x/.Last [ Maximize[{ f[x, .2, .1], 0=98x=982] }, x] ]

> 

> what comes out is

> 

> x/.x

> 

> What am I doing wrong?

> 

> Also, I eventually want to define a function G[p2,ab] that takes on

> the value of the maximizing x for these values.

> that is

> 

> G[p2_,ab_]=x/.Last [ Maximize[{ f[x, .2, .1], 0=98x=982] }, x] ]

> 

> How can I do this?

> 

> 

> Thanks,

> 

> Phil

> 

> 

> 

> 




  • Prev by Date: Re: problem with Inset moving text
  • Next by Date: Re: How should I start with mathematica?
  • Previous by thread: Re: RE: Re: How should I start with
  • Next by thread: Re: Defining functions in mathematica