[Date Index]
[Thread Index]
[Author Index]
Re: Tick marks at frame edges
*To*: mathgroup at smc.vnet.net
*Subject*: [mg32284] Re: [mg32235] Tick marks at frame edges
*From*: BobHanlon at aol.com
*Date*: Wed, 9 Jan 2002 23:38:14 -0500 (EST)
*Sender*: owner-wri-mathgroup at wolfram.com
In a message dated 1/9/02 4:07:45 AM, jl_03824 at yahoo.com writes:
>I tend to plot a curve, y=y(x), where x is also a function of another
>variable, t, x=x(t). So, I want to arrange this curve in a frame such
>that the lower edge of the frame is tick-marked according to t, say
>from 0 to 1, and that the upper edge of the frame is tick-marked
>according to x, say from x(t=0) to x(t=1). I am appreciating with any
>help.
>
x[t_] := Pi*(4*t^2+1)/2;
y[x_] := Sin[x];
Solve[x==x[t], t]//Simplify
{{t -> (-(1/2))*I*Sqrt[1 - (2*x)/Pi]},
{t -> (1/2)*I*Sqrt[1 - (2*x)/Pi]}}
p1 = Plot[x[t], {t,0,1}, DisplayFunction->Identity];
Plot[y[x[t]], {t, 0, 1},
Frame -> True, Axes->False,
FrameLabel -> {"\nt", "y\n", "x\n", None},
FrameTicks -> {Automatic, Automatic,
(Ticks /. AbsoluteOptions[p1])[[2]] /.
{x_?NumericQ, r__} :> {Sqrt[2x/Pi-1]/2, r},
Automatic}, ImageSize->450];
Bob Hanlon
Chantilly, VA USA
Prev by Date:
**Re: Update for MathSource/Stein's mathematica toolbox for Matlab?**
Next by Date:
**Re: real variable**
Previous by thread:
**Re: Tick marks at frame edges**
Next by thread:
**Re: Tick marks at frame edges**
| |