ggplot2で凡例タイトルを変更するとゴーストの凡例が表示されますか？

Question

ggplot2ラインプロットで私の伝説のタイトルを調整しようと何時間も試みてきましたが、私は本当のものの下に「ゴーストの伝説」を表示します。私は（順番にcoluor、線種や記号）私の伝説の部分を調整するために、次のコードを使用しています：

scale_color_manual(values = c("#FF6600", "green4", "#0099FF")) +     
    scale_linetype_manual(values=c("solid", "solid", "solid")) + 
    scale_shape_manual(values = c(16, 16, 16)) + 

これは私のグラフに一致する素敵な伝説を思い付きます。しかし、私はこのコードでタイトルを追加しようとすると：

labs(linetype='title')+ 

私は別の伝説を得る正しいタイトルが、前の書式のどれで、（その両方が同時にプロット上にある）の下に表示されます。明らかに私は別の伝説をコーディングしていますが、修正できません！

はまた、私は私の伝説を与えたい本当のタイトルは、CO2の添え字の「2」を必要とし、私は他のタイトルにそれを説明するために、以下の使用してきました：私は思い

expression(CO[2]~concentration~(ppm)) 

思想それが何かを変更する場合に備えて言及してください。

私はそれにもかかわらず、凡例の向きを垂直リストではなく水平に変更し、それをプロットスペースの隅に移動したいとします。場合）。

私の問題は、新しいものを試してみると、エラーの化合物と私は前進できないということです。

私はこの投稿がエレガントではないことを認識していますが、どんな助けでも大歓迎です。申し訳ありませんが、私はサンプルコードを提供していません、私はRの初心者であり、完全に水泳です。
ありがとうございます！

Answer 1

あなたが再現可能な例を作成するにはあまりにも新しいものかもしれないので、ここで試してみると答えます：

library(ggplot2) 
set.seed(100) 
df1 <- subset(diamonds, cut %in% (levels(diamonds$cut)[1:3]))[sample(100),] 
p <- ggplot(df1, aes(x=carat, y=price, colour=cut, shape=cut, linetype=cut, group=cut)) 
p <- p + geom_line() 
p + scale_color_manual(values = c("#FF6600", "green4", "#0099FF")) +     
    scale_linetype_manual(values=c("solid", "solid", "solid")) + 
    scale_shape_manual(values = c(16, 16, 16)) + 
    labs(linetype='title') 

が、これは「幽霊の伝説」となっていますか？

回避方法があります。タイトルは、他の美学のために配置する必要があります。

p + scale_color_manual(values = c("#FF6600", "green4", "#0099FF")) +     
    scale_linetype_manual(values=c("solid", "solid", "solid")) + 
    scale_shape_manual(values = c(16, 16, 16)) + 
    labs(linetype=expression(CO[2]~concentration~(ppm)), 
     colour=expression(CO[2]~concentration~(ppm)), 
     shape=expression(CO[2]~concentration~(ppm))) 

余分な伝説がなくなっています。これは、異なる名前のために起こった。私たちはすべての美学の名前を繰り返しました。

短いオプションは、他のスケールにguide="none"を追加することです：

p + scale_color_manual(name=expression(CO[2]~concentration~(ppm)), 
         values = c("#FF6600", "green4", "#0099FF")) +     
    scale_linetype_manual(guide="none",values=c("solid", "solid", "solid")) + 
    scale_shape_manual(guide="none",values = c(16, 16, 16))