RE: Drawing intrinsic coordina
|Anyone know how (possibly with an add-in package?) to draw intrinsic
|coordinate graphs with Mathematica 3? Also, anyone know how to
|implement a RationalQ function that tells if the supplied parameter is
|rational or not, e.g.
| RationalQ[Sqrt] = False
| RationalQ[1/3] = True
Don't know what you mean about an intrinsic coordinate graph. But I can
answer your problem with RationalQ.
There are several ways to do it.
It all depends what you want.
Now is that right?
Sqrt x+Sqrt(Sqrt/2-x) simplifies to (3/2) but Out above
says it isn't rational.
To fix that you can use the next approach: If you really want to cover
your bases you can use FullSimplify instead of Simplify, but it
sometimes takes a very long time.
RationalQ2[Sqrt x+Sqrt(Sqrt/2-x)], RationalQ2[x]}
Now we see (Sqrt x+Sqrt(Sqrt/2-x)) is considered rational.
Except I cleared (x) above, and Out above says (x) is not rational.
What if you want to say
(x) may represent a number, and that number may be rational. The next
approach fixes that.
RationalQ3[Sqrt x+Sqrt(Sqrt/2-x)], RationalQ3[x]}
Now RationalQ3[x] doesn't change during evaluation. We still find
that (Sqrt x+Sqrt(Sqrt/2-x)) is considered Rational.
Prev by Date:
Next by Date:
RE: Sorting of Data Lists
Prev by thread:
Next by thread:
Global Optimization - New product announcement