J'ai un problème de "dimension" avec la fonction image. Je veux lui faire tracer un carré (en gris) et délimiter ce carré en vert. Seulement quand j'applique mon code, les lignes vertes sont dans le carré… Or, je voudrais que les lignes vertes encadrent la zone grise.
Comme ce n'est sûrement pas très clair, je vous partage cet exemple reproductible:
Code : Tout sélectionner
r <- 1
scale = 0.1
x <- seq(-r, r, scale)
nrow.m <- ncol.m <- length(x)
Xg <- expand.grid(X1 = 1:nrow.m, X2=1:ncol.m, X3=1:nrow.m)
Xg$X1g <- (Xg$X1-1)*scale-r
Xg$X2g <- (Xg$X2-1)*scale-r
Xg$X3g <- (Xg$X3-1)*scale-r
Xg$D <- as.numeric(runif(nrow(Xg))<0.1)
m <- matrix(nrow=nrow.m,ncol=ncol.m)
m[as.matrix(Xg[1:2])] <- Xg[,7]
lim <- 1.55
plot(0,0,xlim=c(-lim,lim),ylim=c(-lim,lim),asp=1)
image(x,x,m,col=c("gray", "white"),add=TRUE)
Dom <- data.frame(x = c(-1, -1, 1, 1, -1), y = c(-1, 1, 1, -1, -1))
lines(Dom, lwd = 2, col = "green")
Savez-vous pourquoi ?
Merci pour votre aide,
Diane