Локатори

Какво е локатор?

Locator[]

Graphics[Locator[]]

Къде се използва?

Graphics

Локаторът е вид примитив и можем да го използваме като елемент на списък от други примитиви. Също можем да добавяме и възможните опции на Graphics.

Добавяме опции:

Graphics[Locator[{0.5,0.7}],
 Frame -> True, 
ImageSize->150,
PlotRange->{{-1,7},{-2,5}}
]

Добавяме примитиви:

Manipulate

Свързваме елементите от графиката с локатора
1. Определяме начална стойност на локатора:

2. Насочваме стрелката към локатора:

3. Сплайн-кривата се изменя в зависомост от локатора:

4. Опции на локатора:
	4.1. Appearence

4. Опции на локатора:
	4.1. LocatorAutoCreate

Задание за самостоятелна работа

Основно:

Manipulate[Graphics[{{Text["Самостоятелно задание на <име>",{0,2.7}]},
Line[{{0, 0}, point}], Dashed, Line[{{point[[ 1]], 0}, point, {0, point[[ 2]]}}]},
   Axes -> True, PlotRange -> 3, Ticks -> {{point[[1]]},{point[[2]]}}, ImageSize -> Small], {{point, {1, 1}}, Locator}]

Повишена сложност:

Manipulate[Graphics[{{Text["Самостоятелно задание на <име>", {0, 2.7}]},
   Table[{Red, Line[{{0, 0}, points[[i]]}]}, {i, 1, Length[points]}], 
   Dashed, Thin, If[thicks, Table[Line[{{points[[i, 1]], 0}, points[[i]], {0, points[[ i, 2]]}}], {i, 1, Length[points]}]]},
     Axes -> True, PlotRange -> 3,
   Ticks -> If[thicks, {Table[points[[i, 1]], {i, 1, Length[points]}], Table[points[[i, 2]], {i, 1, Length[points]}]}, None],  (*Ticks->None,*)
   ImageSize -> Small, TicksStyle -> 5], {{points, {{1, 1}}}, Locator, LocatorAutoCreate -> True,
  Appearance -> Style["♡", Red, Bold]},
 {{thicks, True, "Показване на координатите"}, {True, False}}]