tracer plus d'un ensemble de données dans R en utilisant xyplot

Question

Je voudrais tracer plusieurs ensembles de données sur ce graphique mais je n'arrive pas à comprendre comment. Je dois mettre t, u, v, w sur le xyplot déjà en fonctionnement.

library(lattice) 
x <- rnorm(250, 5, .5) 
y <- rnorm(250, 5, .4) 

t <- rnorm(200, 6, .7) 
u <- rnorm(200, 6, .6) 

v <- rnorm(150, 7, .9) 
w <- rnorm(150, 7, .8) 

xyplot(y ~ x, xlab="", ylab="", 
    par.settings = list(axis.line = list(col="transparent")), 
    panel = function(x, y,t,u,...) { 
    panel.xyplot(x, y, col=3, pch=16) 
    panel.rug(x, y, col=8, x.units = rep("snpc", 2), y.units = rep("snpc", 
2), ...)}) 

Answer 1

Si vous cherchez à faire un diagramme de dispersion des points dont les coordonnées sont définies par (x, y), (t, u), & (v, w), ce qui suit devrait travailler pour vous:

df <- data.frame(V1 = c(x, t, v), 
       V2 = c(y, u, w), 
       V3 = c(rep("xy", length(x)), rep("tu", length(t)), rep("vw", length(v)))) 

xyplot(V1 ~ V2, group = V3, data = df, 
     xlab="", ylab="", 
     par.settings = list(axis.line = list(col="transparent")), 
     panel = function(x, y, groups...) { 
     panel.xyplot(x, y, 
         col = c("red", "blue", "green"), # change this if you want other colours 
         pch=16) 
     panel.rug(x, y, col = 8, x.units = rep("snpc", 2), y.units = rep("snpc", 2)) 
     }) 

Si vous cherchez à les tracer dans le tableau d'une autre manière, s'il vous plaît préciser dans votre question.