使用 ggplot2 更改密度圖中圖例的形狀

Question

我想將密度圖圖例中顯示的框更改為線條，並且我知道我需要使用指南。 但是，以下代碼不起作用：

set.seed(0)    
df <- data.frame(Income=c(rnorm(500,1000,200),rnorm(500,900,10)),Type=c(rep("A",500),rep("K",500)))
p2p <- ggplot(df,aes(x=Income))+geom_density(aes(colour=Type))+
guides(colour = guide_legend(override.aes = list(linetype = 1, shape = 3)))

Answer 1

你在尋找這樣的東西嗎？

ggplot(df,aes(x=Income))+ 
  geom_density(aes(colour=Type),show_guide=FALSE)+
  stat_density(aes(x=Income, colour=Type), 
               geom="line",position="identity")