Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2007
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2007

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

Search the Archive

Is this the best way to Solve the Katsura 6 problem

  • To: mathgroup at smc.vnet.net
  • Subject: [mg73878] Is this the best way to Solve the Katsura 6 problem
  • From: "Raj" <rajanikanth at gmail.com>
  • Date: Fri, 2 Mar 2007 06:40:41 -0500 (EST)

hi!

Could somebody tell me if this is the best way to solve the Katsura 6
problem:

NSolve[{x1 + 2x2 + 2x3 + 2x4 + 2x5 + 2x6 + 2x7 - 1   ,
    2x4 x3 + 2x5 x2 + 2x6 x1 + 2x7 x2 - x6   ,
    x3^2 + 2x4 x2 + 2x5 x1 + 2x6 x2 + 2x7 x3 - x5   ,
    2x3 x2 + 2x4 x1 + 2x5 x2 + 2x6 x3 + 2x7 x4 - x4   ,
    x2^2 + 2x3 x1 + 2 x4 x2 + 2 x5 x3 + 2 x6 x4 + 2 x7 x5 - x3   ,
    2 x2 x1 + 2 x3 x2 + 2 x4 x3 + 2 x5 x4 + 2 x6 x5 + 2 x7 x6 - x2   ,
    x1^2 + 2 x^2 + 2 x3^2 + 2 x4^2 + 2 x5^2 + 2 x6^2 + 2 x7^2 - x1  },
{x1,x2,x3,
x4,x5,x6,x7}]


Thanks,

Raj



  • Prev by Date: need MathLie mathematica package
  • Next by Date: Re: deleting a title or subtitle in a notebook
  • Previous by thread: Re: need MathLie mathematica package
  • Next by thread: Re: Is this the best way to Solve the Katsura 6 problem