Sottoinsieme e ggplot2

Question

Ho un problema per tracciare un sottoinsieme di un frame di dati con ggplot2. Il mio df è come:

ID Value1 Value2 
P1 100 12 
P1 120 13 
... 
P2 300 11 
P2 400 16 
... 
P3 130 15 
P3 140 12 
... 

Come posso ora tracciare Value1 vs Valore2 solo per gli ID P1 e P3? Per esempio ho provato:

ggplot(subset(df,ID=="P1 & P3") + geom_line(aes(Value1, Value2, group=ID, colour=ID))) 

ma ricevo sempre un errore.

p.s. Ho provato anche molti combinazione con P1 & P3 ma ho sempre fallito ..

Answer 1

Qui 2 opzioni per sottoinsiemi:

Utilizzando subset dalla base R:

library(ggplot2) 
ggplot(subset(dat,ID %in% c("P1" , "P3"))) + 
     geom_line(aes(Value1, Value2, group=ID, colour=ID)) 

Utilizzo di subset l'argomento di geom_line (Nota Sto utilizzando il pacchetto plyr per utilizzare la funzione speciale .).

library(plyr) 
ggplot(data=dat)+ 
    geom_line(aes(Value1, Value2, group=ID, colour=ID), 
       ,subset = .(ID %in% c("P1" , "P3"))) 

È anche possibile utilizzare il sottoinsiemi complementari:

subset(dat,ID != "P2") 

Answer 2

Siete alla ricerca per il seguente grafico:

library(ggplot2) 
l<-df[df$ID %in% c("P1","P3"),] 
myplot<-ggplot(l)+geom_line(aes(Value1, Value2, group=ID, colour=ID)) 

Answer 3

vostra formulazione è quasi corretto. Si desidera:

subset(dat, ID=="P1" | ID=="P3") 

Dove il | ('pipe') significa 'o'. La soluzione, ID=="P1 & P3", è alla ricerca di un caso in cui ID è letteralmente "P1 & P3"

Answer 4

C'è un'altra soluzione che trovo utile, soprattutto quando voglio per tracciare più sottoinsiemi dello stesso oggetto:

myplot<-ggplot(df)+geom_line(aes(Value1, Value2, group=ID, colour=ID)) 
myplot %+% subset(df, ID %in% c("P1","P3")) 
myplot %+% subset(df, ID %in% c("P2")) 

Answer 5

Con l'opzione 2 nella risposta di @ agstudy ora deprecata, la definizione dei dati con una funzione può essere utile.

library(plyr) 
ggplot(data=dat) + 
    geom_line(aes(Value1, Value2, group=ID, colour=ID), 
      data=function(x){x$ID %in% c("P1", "P3")) 

Questo approccio risulta utile se si desidera riutilizzare un set di dati nello stesso appezzamento, per esempio non si desidera specificare una nuova colonna nel data.frame, o se si vuole tracciare esplicitamente un set di dati in uno strato sopra l'altro filtro .:

library(plyr) 
ggplot(data=dat, aes(Value1, Value2, group=ID, colour=ID)) + 
    geom_line(data=function(x){x[!x$ID %in% c("P1", "P3"), ]}, alpha=0.5) + 
    geom_line(data=function(x){x[x$ID %in% c("P1", "P3"), ]}) 

Answer 6

Provare a sottoinsieme solo le righe di P1 e P3

df2 <- filter(df, ID == "P1" | ID == "P3") 

Quindi è possibile stampare Valore1. vs Valore2.