Group Abstract Group Abstract

Message Boards Message Boards

Get a ParametricPlot with interactive parameter, to trace the coordinates?

Posted 7 years ago
POSTED BY: Ehud Behar
3 Replies
Posted 7 years ago

Thanks. That's what I was looking for.

But, is there any way to extract out this command you wrote of the Wolfram|Alpha subpod?

POSTED BY: Ehud Behar
DynamicModule[{tr = 1},
 Column[{
   Show[
    ParametricPlot[
     {Cos[t], Sin[2 t ]}, {t, 0, 2 Pi}, 
     GridLines -> 
      Dynamic[List /@ CurrentValue[{"MousePosition", "Graphics"}]]
     , PlotStyle -> Directive[Thin, Gray]
     ],
    Graphics@{Dynamic[First@ParametricPlot[
          {Cos[t], Sin[2 t ]}, {t, 0.0001, 2 Pi tr},
          PlotStyle -> Thick
          ] /. Line -> Arrow]
      }
    , ImageSize -> Large],
   Slider@Dynamic@tr
   }]
 ]
POSTED BY: Kuba Podkalicki

ParametricPlot[{Cos[t], Sin[2 t]}, {t, 0, 2 Pi}]

POSTED BY: Sunil Nandihalli
Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.
Reply Preview
Attachments
Remove
or Discard