I comandi di R impiegabili per una gestione in laboratorio di alcuni dei contenuti della scheda.
Altri esempi sono contenuti nella scheda stessa.
Vedi qui per una guida all'uso di R (clicca "Command index" per un indice alfabetico)

BF=4; HF=4
PLANE(-1,10, -3,8)
xA=1; yA=3; POINT(xA,yA, 1)
xB=10; yB=7; POINT(xB,yB, 1)
arrow(xA,yA, xB,yB, "blue")
arrow(xA-xA,yA-yA, xB-xA,yB-yA, "brown")
type(0.5,3.5,"A")
type(9.5,7.5,"B")
type(-0.5,-0.5,"O")
type(8.5,4.5,"N")
#
PLANE(0,12, -3,9)
xA=1; yA=3; POINT(xA,yA, 1)
v1=c(8,4)
xQ=xA+v1[1]; yQ=yA+v1[2]; POINT(xQ,yQ, 1)
v2=c(3,-6)
xR=xQ+v2[1]; yR=yQ+v2[2]; POINT(xR,yR, 1)
arrow(xA,yA, xQ,yQ, "blue")
arrow(xQ,yQ, xR,yR, "blue")
arrow(xA,yA, xR,yR, "brown")
v1+v2
#
PLANE(-1,10, -1,10)
u=c(6,9); v=c(10,5)
arrow(0,0, u[1],u[2], 1)
arrow(0,0, v[1],v[2], 1)
w=u-v
arrow(v[1],v[2], u[1],u[2], "brown")
w
type(6.5,2.5,"v")
type(4.5,5.5,"u")
type(8.5,7.5,"w")
#
PLANE(-10,10, -10,10)
F = function(x,y) point_point(x,y, 0,0)-10
CURVE(F, "red")
G = function(x,y) dist_taxi(x,y, 0,0)-10
CURVE(G, "blue")
#
PLANE(-10,10, -10,10)
P = function(x,y) abs(x) <= 5 | abs(y) <= 5 
diseq2(P,0, "blue")
for(i in 1:10) diseq2(P,0, "blue")
# es.7
PLANE(-10,10, -10,10)
P = function(x,y) x^2+y^2<25 & x^2+y^2>9
for(i in 1:10) diseq2(P,0, "blue")
#
PLANE(0,12, -2,10)
P = function(x,y) x < 11 & x > 2 & y < 7 & y > 1
Q = function(x,y) x < 10 & x > 3 & y < 6 & y > 2
R = function(x,y) P(x,y) & !Q(x,y)
for(i in 1:10) diseq2(R,0, "blue")
# es.8
PLANE(-10,10, -10,10)
P = function(x,y) !(x^2+y^2<25 & x^2+y^2>9)
for(i in 1:10) diseq2(P,0, "blue")