Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2005
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2005

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

Search the Archive

refining expression in terms of real numbers

  • To: mathgroup at smc.vnet.net
  • Subject: [mg58735] refining expression in terms of real numbers
  • From: "Mukhtar Bekkali" <mbekkali at gmail.com>
  • Date: Sat, 16 Jul 2005 01:03:43 -0400 (EDT)
  • Sender: owner-wri-mathgroup at wolfram.com

My expression is real for all values of gamma between half and one (I
plotted it just to be sure), yet the general solution that Mathametica
generates may imply that I have an unreal solution, an impression that
I would like to avoid. Is there a way to make Mathematica refine
solutions in terms of real numbers. Here is the input:

\!\(expr := Refine[Root[\(-160\) + 783\ γ + 54\
            γ\^2 - 1059\ #1 - 540\ γ\ #1 + 504\ #1\^2 + 80\ #1\^3 &,
2] //
                 ToRadicals, 1\/2 < γ < 1] //
Simplify\[IndentingNewLine]
  expr\[IndentingNewLine]
  \(Plot[expr, {γ, 1\/2, 1}];\)\)

Thanks, Mukhtar Bekkali


  • Prev by Date: Re: Light and surface colors
  • Next by Date: Re: Polynomial eigenvalue problem
  • Previous by thread: Re: How can get the Path of current Notebook ?
  • Next by thread: Re: refining expression in terms of real numbers