       Re: Manipulate graphs with graphics

• To: mathgroup at smc.vnet.net
• Subject: [mg122898] Re: Manipulate graphs with graphics
• From: JasonE <ebaughjason at gmail.com>
• Date: Tue, 15 Nov 2011 05:49:50 -0500 (EST)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com
• References: <j9r0o0\$bj4\$1@smc.vnet.net>

```Combine the arrow and the plot in Show[ ], then Manipulate[ ] that
expression.

Manipulate[
Show[{
Graphics[{ Arrow [ {{0,0} , {x,y}}]} ],
ParametricPlot[ {Sin[u], Sin[2u]} , {u,0,c*Pi}]} ],
{x,-1,1}, {y,-1,1}, {c,0.1,2}]

Jason Ebaugh

On Nov 14, 6:14 am, Hansotto <hansotto.kristian... at gmail.com> wrote:
> Hi guys.
>
> How do you plot a graph (parametric, in my case) and a graphic (arrow, as vector) in one "window" of manipulate?
>
> I'm trying to plot a clotoide with vector of velocity and acceleration...
>
> Here's what I've got so far:
>
> Manipulating the arrow by itself:
> Manipulate[
>  Graphics[{Red,
>    Arrow[{{Part[First[R[t]], 1],
>       Part[Last[R[t]], 1]}, {Part[First[R''[t]], 1],
>       Part[Last[R''[t]], 1]}}]}], {t, 0, 5}]
>
> Manipulating the clotoide by itself (R[t] is the x and y's of the clotide):
> Manipulate[
>  ParametricPlot[R[t], {t, 0, t}, PlotRange -> {-3, 3}], {t, 0.001, 4}]
>
> How do I COMBINE those two?!
>