MathGroup Archive 2011

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

Search the Archive

Re: Solve vs. nonlinearity

  • To: mathgroup at smc.vnet.net
  • Subject: [mg118278] Re: Solve vs. nonlinearity
  • From: Alan G Isaac <alan.isaac at gmail.com>
  • Date: Wed, 20 Apr 2011 04:26:35 -0400 (EDT)

>> Is there a simple way to approach getting Mathematica to
>> produce a solution in the following problem?
>> (Without assigning to r.)
>>
>> myL = w1*n + w2*k + g*(q0^r - (a*n^r + (1-a) k^r));
>> grad = D[myL, {{n, k, g}}]
>> Solve[grad == 0, {n, k, g}]


On 4/17/2011 8:00 PM, DrMajorBob wrote:
> Umm... evaluate the code?

> {{n -> ((((k^(1 - r))^(1/(1 - r)))^(-1 + r) (w1 - a w1))/(a w2))^(
>     1/(-1 + r)), g -> -((k^(1 - r) w2)/((-1 + a) r))}}



Note that this does not solve for k.
(Or possibly I'm missing your point.)

Thanks,
Alan


  • Prev by Date: Re: SortBy + Sort Strings with apo.marks + CharacterCode
  • Next by Date: Re: solution
  • Previous by thread: Re: Solve vs. nonlinearity
  • Next by thread: Re: Solve vs. nonlinearity