ggplot specyficzna gruba linia

Question

Jak można byłoby wykreślić jedną linię grubszą od drugiej. Próbowałem użyć geom_line(size=X), ale to zwiększa grubość obu linii. Powiedzmy, że chciałbym zwiększyć grubość pierwszej kolumny, w jaki sposób można się do tego zbliżyć?

a <- (cbind(rnorm(100),rnorm(100))) #nav[,1:10] 
sa <- stack(as.data.frame(a)) 
sa$x <- rep(seq_len(nrow(a)), ncol(a)) 
require("ggplot2") 
p<-qplot(x, values, data = sa, group = ind, colour = ind, geom = "line") 
p + theme(legend.position = "none")+ylab("Millions")+xlab("Age")+ 
geom_line(size = 1.5) 

Answer 1

Musisz map grubość linii do zmiennej:

p + geom_line(aes(size = ind)) 

Aby kontrolować korzystanie grubość scale_size_manual():

p + geom_line(aes(size = ind)) + 
    scale_size_manual(values = c(0.1, 1))