2011-02-17 17 views
17

के साथ लापता किंवदंती ggplot में लाइनों की साजिश करते समय प्रदर्शित करने के लिए कोई किंवदंती कैसे प्राप्त करता है? मैं सभी शाम की कोशिश कर रहा हूं लेकिन असफल रहा हूं।ggplot2 और geom_line

p <- ggplot(output, aes(lambda), legend=TRUE) + 
    geom_line(aes(y=train.err), colour="red", label="r") + 
    geom_line(aes(y=test.err), colour="blue", label="b") + 
    geom_line(aes(y=data.err), colour="green", label="g") 

print(p) 

कहाँ उत्पादन निम्नलिखित संरचना के साथ एक dataframe है:

'data.frame': 2101 obs. of 4 variables: 
$ lambda : num 3.06e-07 3.09e-07 3.12e-07 3.15e-07 3.18e-07 ... 
$ train.err: num 0.415 0.415 0.415 0.415 0.415 ... 
$ test.err : num 0.373 0.373 0.373 0.373 0.373 ... 
$ data.err : num 0.398 0.398 0.398 0.398 0.398 ... 

उत्तर

35

डाल रंग एईएस के अंदर इस तरह:

d2 <- melt(d, id="x") 
ggplot(d2, aes(x, value, colour=variable)) + 
    geom_line() + 
    scale_colour_manual(values=c("red", "blue")) 
:

d<-data.frame(x=1:5, y1=1:5, y2=2:6) 

ggplot(d, aes(x)) + 
    geom_line(aes(y=y1, colour="1")) + 
    geom_line(aes(y=y2, colour="2")) + 
    scale_colour_manual(values=c("red", "blue")) 

लेकिन मैं इस तरह की सिफारिश