Re: How can I automate this problem in a mathematica notebook?

• To: mathgroup at smc.vnet.net
• Subject: [mg74076] Re: How can I automate this problem in a mathematica notebook?
• From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
• Date: Thu, 8 Mar 2007 04:44:00 -0500 (EST)
• References: <eslsqe\$q5a\$1@smc.vnet.net>

```Hi,

answer[q_?NumericQ,alpha??NumericQ]:= "a pretty long equation in terms
of q and alpha"

maxf[alpha_?NumericQ]:=Maximize[{answer[q,alpha], {0 < q < 1}}, q]

Plot[maxf[alpha],{alpha,0.25,1}]

??

Regards
Jens

> I was asked to automate the problem below in mathematica:
>
> I'm using a function called answer[q_] in terms of two parameters alpha and q.
>
>
> answer[q_]:= "a pretty long equation in terms of q and alpha"
>
> The maximum values of q can be obtained from this:
>
> Maximize[{answer[q], {0 < q < 1}}, q]
>
> but obviously I need to specify a value for alpha to get a maximum value for q
>
> So basically I want to plot answer[q] for values of alpha between 0.25 and 1 such that q is maximum in answer[q] (maximum q will be different for a the different alpha values).
>
> I hope someone can tell me how to code this so that it is automated in mathematica. I'm guessing this should be an easy problem for you people :)
>

```

• Prev by Date: Re: look at this problem
• Next by Date: Re: Problem with Which
• Previous by thread: Re: How can I automate this problem in a mathematica notebook?
• Next by thread: Re: How can I automate this problem in a mathematica notebook?