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
tnad wrote:
> 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 :)
>