Comando CoordenadasDinámicas

Página en proceso de traducción.

CoordenadasDinámicas[ <Punto>, <Valor_Abscisa>, <Valor_Ordenada> ]: Crea un punto, dependiente del indicado pero desplazable.Así, B = CoordenadasDinámicas[ A, vx, vy ] crea el punto B vinculado a A.Los valores de los dos últimos parámetros establecen, el primero, su abscisa y el segundo, su ordenada, respectivamente.Al intentar mover el Punto, B a las coordenadas (x, y), A, se desplaza a esa posición y se calculan las coordenadas de B según lo establecido.

Ejemplos: Este comando suele emplearse para hacer más certeros los tanteos exploratoriosSi el punto B quedó definido por B = CoordenadasDinámicas[A, round(x(A)), round(y(A))], si se desplaza B a (1.3, 2.1) con la herramienta Elige y Mueve, A se ubica en (1.3, 2.1) y B, en (1, 2).Si el punto B quedó definido por B = CoordenadasDinámicas[A, x(A), Mínimo[y(A), sin(x(A)) ] ] crea un punto por debajo de sin(x).

Notas: Todo opera mejor si A no está visible y es con el mouse o ratón que se realiza el arrastre.Al menos uno de los dos valores, el asignado a la abscisa o el dado a la ordenada, debieran depender de A.

B = PuntoEn[y < sin(x)] sería una solución más práctica en este último caso.

Restringir la Posición de un Punto

Las siguientes maniobras muestran otros modos de restringir la posición de un punto C:

Sea A = Punto[EjeX] y B = Punto[EjeX]. Al ingresar en la Barra de Entrada:*C = CoordenadasDinámicas[B, Mínimo[x(B), x(A)], 0]* y luego Visibilidad[B, 1, 3 > 4] y finalmente Capa[C, 1], pulsando Intro en cada oportunidad, C no podrá desplazarse a la derecha de A.
Es interesante considerar qué se ocasiona si se pasa a definir A = (1, 2) y anotar en la Barra de Entrada: Visibilidad[A, 1, 1 > 0 ] y pulsar Intro, B=CoordenadasDinámicas[A, Si[x(A) > 3, 3, Si[x(A) < -(3), -3, Si[x(A) < 0, round(x(A)), x(A)]]], Si[x(A) < 0, 0.5, Si[y(A) > 2, 2, Si[y(A) <0, 0, y(A)]]]], y pulsar Intro.

Puntos Adhesivos

La serie de pasos convierte a A en un punto adhesivo cuando el punto C se arrastra a sus proximidades.

Al definir A= (1, 2) y B= (2, 3) e ingresar en la Barra de Entrada: Visibilidad[B, 1, 1 > 2] y pulsar Intro y C = CoordenadasDinámicas[B, Si[Distancia[A, B] < 1, x(A), x(B)], Si[Distancia[A, B] < 1, y(A), y(B)]].