Mathematica: почему движутся оба локатора?

[Dims]

Хочу провести синусоиду через две точки, заданные локаторам. В формуле, может, напутал, но всё равно непонятно, почему если хватаешь за один локатор, движутся оба?

DynamicModule[{p2, ampl, shift},
 p1 = {0, 1};
 p2 = {1, 0};
 Dynamic[
  ampl = p1[[2]];
  shift = p1[[1]];
  freq = ArcCos[p2[[2]]/ampl]/(p2[[1]] - shift);
  Show[
   Plot[ampl*Cos[(x - shift)*freq], {x, -10, 10}],
   Graphics[{
     Locator[Dynamic[p1]],
     Locator[Dynamic[p2]]
     }],
   PlotRange -> {{-10, 10}, {-1, 1}}
   ]
  ]
 ]
Dynamic[p1]

[Dims]

Хоть объясните: считаете ли вы это багом или я неправильно понимаю работу Dynamic?

[arseniiv]

Увы, боюсь, не у всех Mathematica такая новая. У меня пятая. :) А что говорит справка?

[Casaubon]

В таком виде у меня тоже не работает. Но я динамические переменные программирую несколько в ином стиле, и вот какой рабочий вариант получился у меня:

Manipulate[Module[{ampl, shift, freq},
  ampl = p1[[2]];
  shift = p1[[1]];
  freq = ArcCos[p2[[2]]/ampl]/(p2[[1]] - shift);
  Plot[ampl*Cos[(x - shift)*freq], {x, -10, 10}, 
   PlotRange -> {{-10, 10}, {-1, 1}}]
  ], {{p1, {0, 1}}, Locator}, {{p2, {1, 0}}, Locator}
 ]

Использую версию 7.0.2

[Dims]

Да, при помощи Manipulate у меня тоже получилось. Однако, в справке написано, что Dynamic -- это базис для Manipulate, поэтому я пытался всё делать с помощью него. Непонятно, почему мой вариант работает именно так.

Я установил, что для того, чтобы локаторы получались связаны, нужно, чтобы присутствовала функция Plot.

Например, в таком варианте

DynamicModule[{p2, ampl, shift}, p1 = {0, 1};
p2 = {1, 0};
Dynamic[ampl = p1[[2]];
shift = p1[[1]];
freq = ArcCos[p2[[2]]/ampl]/(p2[[1]] - shift);
Show[Graphics[Line[{p1, p2}]],
Graphics[{Locator[Dynamic[p1]], Locator[Dynamic[p2]]}],
PlotRange -> {{-10, 10}, {-1, 1}}]]]
Dynamic[p1]

локаторы можно двигать независимо, хотя это принципиально то же самое, а если вписать совершенно любой Plot (даже рисующий константный график), локаторы оказываются зависимы.

Кроме того, зависимость управляется наличием p1 и/или p2 в тексте программы. Так, если там присутствует только одна переменная, то второй локатор получается зависимым от первого, но не наоборот.

Казалось бы, функция Dynamic очень удобна: есть сложное выражение или программа и можно любые его подвыражения пометить Dynamic-ом, если ты хочешь, чтобы они автоматически обновлялись при появлении на экране.

Ан нет, что-то они там нахимичили...

Непонятно, столько помпы, за такую цену программу продают -- а я постоянно на баги натыкаюсь!

[arseniiv]

Dims в сообщении #395400 писал(а):

а я постоянно на баги натыкаюсь!

В пятой не было.
Я бы покопался в справке по этим функциям на их сайте, но, боюсь, одной справкой без приложения к опыту не пойму.