# [✓] Put 2 different plots inside a manipulation?

GROUPS:
 I would like to have a notebook with 2 different kinds of plots inside a manipulation, in which the control for the manipulation uses locators linked to one of the plots. A simple example of something close to what I desire that will work is shown in the code below, but only one of the plots is inside the manipulate. The example plots a pair of sinusoids where the amplitudes and phases are controlled with the mouse by moving a variable around the complex plane. Dynamic[Plot[{Sqrt[w[[1, 1]]^2 + w[[1, 2]]^2] Sin[ 2 \[Pi] t + ArcTan[w[[1, 2]]/w[[1, 1]]]], Sqrt[w[[2, 1]]^2 + w[[2, 2]]^2] Sin[ 2 \[Pi] t + ArcTan[w[[2, 2]]/w[[2, 1]]]]}, {t, 0, 1}, PlotRange -> {{0, 1}, {-3, 3}}]] Manipulate[w = p; ListPlot[p, PlotRange -> {{-2, 2}, {-2, 2}}], {{p, {{-1, -1}, {1, 1}}}, Locator}] But what I would really prefer is to do the same calculations with something like the following, which does not work. Is there anything similar to this second approach that does work? Manipulate[w = p; GraphicsRow[{Plot[{Sqrt[w[[1, 1]]^2 + w[[1, 2]]^2] Sin[ 2 \[Pi] t + ArcTan[w[[1, 2]]/w[[1, 1]]]], Sqrt[w[[2, 1]]^2 + w[[2, 2]]^2] Sin[ 2 \[Pi] t + ArcTan[w[[2, 2]]/w[[2, 1]]]]}, {t, 0, 1}, PlotRange -> {{0, 1}, {-3, 3}}], ListPlot[p, PlotRange -> {{-2, 2}, {-2, 2}}]}], {{p, {{-1, -1}, {1, 1}}}, Locator}]