MathGroup Archive 2001

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

Search the Archive

Re: System for which Solve and NSolve both fail

  • To: mathgroup at smc.vnet.net
  • Subject: [mg30575] Re: [mg30572] System for which Solve and NSolve both fail
  • From: Andrzej Kozlowski <andrzej at tuins.ac.jp>
  • Date: Thu, 30 Aug 2001 03:51:21 -0400 (EDT)
  • Sender: owner-wri-mathgroup at wolfram.com

The brief answer is: a bit of thought is far to much to expect of a 
computer program. General algorithms for solving equations used by Solve 
and NSolve work only for algebraic equations, hence the message you are 
getting. The "way round this problem is" either

1. A bit of thought and inspection

or

2.

In[5]:=
FindRoot[{3^x + 3^y == 90,x+y==6},{x,1},{y,1}]

Out[5]=
{x -> 4., y -> 2.}

Andrzej Kozlowski
Toyama International University
JAPAN
http://platon.c.u-tokyo.ac.jp/andrzej/

On Wednesday, August 29, 2001, at 02:40  PM, Ben Langton wrote:

> Hi,
>
> I noticed that Mathematica seems unable to solve this system of 
> equations :
>
> 3^x + 3^y = 90
>
> x + y = 6
>
> With a bit of thought, you can see by inspection that the solutions are
>
> {x , y} = {2 , 4} or {4 , 2}
>
> However, when I use the commands
>
> Solve[{3^x+3^y==90,x+y==6},{x,y}]
>
> or
>
> NSolve[{3^x+3^y==90,x+y==6},{x,y}]
>
> I get a warning message starting with
>
> Solve::incnst: Inconsistent or redundant transcendental equation
>
> Can anyone shed some light on what is going on here? Any way to get 
> around
> this problem?
>
> (I am using Mathematica v 3.0.0.0 under Mac OS 9.2.1, although I 
> believe a
> similar thing occurs under v 4.x)
>
> Regards,
>
> Ben Langton
>
> http://www.quickmath.com/
>
>



  • Prev by Date: Re: System for which Solve and NSolve both fail
  • Next by Date: Re: Is there a faster way?
  • Previous by thread: Re: System for which Solve and NSolve both fail
  • Next by thread: Re: Mathematica to PDF