Copia e incolla in R i seguenti comandi. Batti A() e clicca lo schermo per ottenere due punti, e prova a trovare le coordinate del punto verde che viene tracciato.  Ripeti la prova ribattendo A().  Spiega come puoi trovare le coordinate del punto verde utilizzando solo le coordinate dei punti marroni (prima verifica se la tua idea è giusta).

source("http://macosa.dima.unige.it/r.R")  # <- non metterlo se lo hai già usato
BF=4; HF=4; PLANE(-5,9,-5,9)
A = function() {PPP(); A1=round(xP); A2=round(yP);
CLEAN(-5,9,-5,9); BOX(); POINT(A1,A2,"brown");
PPP(); B1=round(xP); B2=round(yP); POINT(B1,B2,"brown");
line(A1,A2,B1,B2, "brown"); POINT( (A1+B1)/2,(A2+B2)/2,"seagreen");
cat(A1," ",A2,"   ",B1," ",B2, "   Green point = ?","\n")}
cat("Batti A() e clicca lo schermo 2 volte. Che coordinate ha il punto verde?","\n")
# Batti A() e clicca lo schermo 2 volte. Che coordinate ha il punto verde?
A()
# -3   6     8   -2    Green point = ? 

Dal grafico si ricava che il punto ha coordinate 2.5 e 2.  Da varie prove capisco che viene tracciato il punto medio. Le sue coordinate le trovo facendo la media delle coordinate dei due estremi [(8-3)/2 = 2.5, (6-2)/2 = 2.  Del resto, se osservo il programma, posso capire che anch'esso procede in questo modo.

Vedi anche WolframAlpha