Group Abstract

Message Boards

WOLFRAM COMMUNITY

3K Views

3 Replies

2 Total Likes

View groups...

Follow this post

Share this post:

GROUPS:

Graphics and Visualization Wolfram Language

[Solved] Display a graph and a Graphics object in the same Manipulate?

Gal Winer

Posted 5 years ago

POSTED BY: Gal Winer

3 Replies

Sort By:

Gal Winer

Posted 5 years ago

Looks like, this I simply had an un-needed extra set of braces inside the evaluate. It seems to work now. Thanks for the help!

POSTED BY: Gal Winer

Hans Dolhaine

Hans Dolhaine, retired

Posted 5 years ago

What do you want to see? What is x1 and x2? What is l? Did you mean something like this? Manipulate[ GraphicsRow[{ Graphics[{Red, Circle[{0, 0}, .5]}], ParametricPlot[{a, a^2 - a}, {a, 0, T}, PlotRange -> {-1, 3}] }], {T, 1, 2.5}]

POSTED BY: Hans Dolhaine

Gianluca Gorni

Gianluca Gorni, University of Udine

Posted 5 years ago

I am not sure what the problem is. The following `Manipulate` updates both plots at the same time: With[{x1 = t0, y1 = t0^2, l = 1, T = 1}, Manipulate[ Row[{Graphics[{{Thick, Line[{{0, l}, {x1, y1}}]}, {Red, Disk[{x1, y1}, 0.2]}}, PlotRange -> {{-l, l}, {-l, 2 l}}], Spacer[20], ParametricPlot[{x1, y1} /. t0 -> a, {a, 0, T}, PlotRange -> {{-1, 1}, {0, 1}}]}], {t0, 0, 1, AnimationRate -> 1, RefreshRate -> 60, Appearance -> "Open"}]]

I am not sure what the problem is. The following Manipulate updates both plots at the same time:

With[{x1 = t0, y1 = t0^2, l = 1, T = 1},
 Manipulate[
  Row[{Graphics[{{Thick, Line[{{0, l}, {x1, y1}}]}, {Red, 
       Disk[{x1, y1}, 0.2]}}, PlotRange -> {{-l, l}, {-l, 2 l}}], 
    Spacer[20], 
    ParametricPlot[{x1, y1} /. t0 -> a, {a, 0, T}, 
     PlotRange -> {{-1, 1}, {0, 1}}]}], {t0, 0, 1, AnimationRate -> 1,
    RefreshRate -> 60, Appearance -> "Open"}]]

POSTED BY: Gianluca Gorni

Reply to this discussion

Reply Preview

Attachments

Remove Add a file to this post

Follow this discussion

or Discard

Feedback