ggplot線條圖具有不同的線條樣式和標記

Question

我想在ggplot2中創建一個線條圖，它將某些變量的不同線條樣式和其他變量的不同標記組合在一起。

示例1使用不同的線條樣式繪製每個變量，示例2使用不同的標記繪製每個變量，而示例3使用不同的線條和標記繪製每個變量。

我試圖用不同的線條樣式（實線，虛線）來繪製X2和X3，然後將X4和X5用不同的標記（圓形，方形，任何）作爲實線。

有沒有辦法做到這一點？

library(ggplot2) 
library(reshape2) 

set.seed <- 1 
df <- data.frame(cbind(seq(1,10,1),matrix(rnorm(100,1,20), 10, 4))) 
d <- melt(df, id="X1") 

# Example 1: different line styles 
ggplot(d, aes(x=X1, y=value, color=variable)) + 
    geom_line(aes(linetype=variable), size=1) 

# Example 2: different markers for each line 
ggplot(d, aes(x=X1, y=value, color=variable)) + 
    geom_line() + geom_point(aes(shape=variable, size=4)) 

# Example 3: differnt line styles & different markers (You see this graph below) 
ggplot(d, aes(x=X1, y=value, color=variable)) + 
    geom_line(aes(linetype=variable), size=1) + 
    geom_point(aes(shape=variable, size=4)) 

Answer 1

這是一種方法。您可以使用另外兩個功能來控制形狀和線條類型。 scale_linetype_manual允許您手動分配線型。同樣，scale_shape_manual可讓您手動指定您想要的任何形狀。

# Example 3: differnt line styles & different markers 
ggplot(d, aes(x=X1, y=value, color=variable)) + 
geom_line(aes(linetype=variable), size=1) + 
geom_point(aes(shape=variable, size=4)) + 
scale_linetype_manual(values = c(1,2,1,1)) + 
scale_shape_manual(values=c(0,1,2,3))