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")