Выполнение операций по случайной последовательности

Question

У меня есть случайный список точек, и я хотел бы выполнить для него оператор. Если xPoint ^ 2/2 - yPoint> 0, цвет этой точки красный.

У меня трудности с выполнением этого алгоритма

L=Sequence((RandomBetween(-6,p),RandomBetween(-6,q)),i,1,100)
Sequence[If[ x(Element(L, i))^2/2^2 - y(Element(L, i)) >=0,SetColor(Element(L, counter),"Red")],i,1,50]

Answer 1

Большинство команд GeoGebra являются декларативными, они определяют отношения между объектами.Исключением из этого правила являются обязательные скриптовые команды типа SetColor.Невозможно вызвать сценарии SetColor из декларативной команды, такой как Sequence.Однако вы можете определить список объектов, которые вы хотите сделать красным:

l2=KeepIf[ x(A)^2/2^2 - y(A) >=0, A, L]

, а затем вы можете сделать эти объекты красными либо из пользовательского интерфейса, либо используя SetColor(l2,"red").

.Вы получите два списка, где l2 охватывает некоторые элементы l1.Если это проблема, вы можете определить l3=L\l2 и скрыть исходный список L.

В исходном вопросе во втором списке только 50 элементов, а в L - 100, если вы намеренно можете использовать First(L,50) как последний аргумент KeeepIf.