Hi,
I'm trying to get plot a parametric plot next to a graphic on the same row. I'd like to have the plot only update up to the current value of the manipulate variable at each step, such that it is in sync with the graphic. (the graphic shows a pendulum, the plot should show it's y coordinate as a function of time) My current solution shows the plot and graphic side by side in braces ({ , }) and i'm not sure how to go about updating the graph.
any help would be appreciated.
thanks!
Evaluate[{
GraphicsRow[{Graphics[{
{Thick, Line[
{{0, l}, {x1, y1}}]},
{Red, Disk[{x1, y1}, 0.2]}
}
, PlotRange -> {{-l, l}, {-l, 2 l}}],
ParametricPlot[{x1, y1} /. t0 -> a, {a, 0, T},
PlotRange -> {{-1, 1}, {0, 1}}]
}]
}]
, {t0, 0, T, AnimationRate -> 1, RefreshRate -> 60,
Appearance -> "Open"}]