ggplotラインカラー「黒」は赤

Question

になり、私は

hypttauplot <- qplot(fuclin_csf, fitHYPTTAU, data=selTAU, geom=c("smooth"), 
        method="glm", color='black', linetype=BL_HYPT) + 
       theme_classic() + xlab("Time (years)") + ylab("Tau (pg/ml)") + 
       scale_x_continuous(expand=c(0,0)) + 
       ggtitle("A. Hypertension") + 
       theme(legend.position = "none") 

下のグラフを作るために次のスクリプトを使用しかし、今、私の質問です：なぜ行は赤の代わりに、黒ですか？そして私はどのように黒に変えることができますか？

Answer 1

qplot()で手動で美しさを設定するには、I()を使用する必要があります。 colour=I("black")（設定と美学のマッピング）あなたは、マッピングの独自のセットを指定するscale_colour_manualを使用することができます

# mapping 
qplot(carat, price, data=diamonds, color="black") 
# equivalent to ggplot(data=diamonds, aes(carat, price, color="black")) + geom_point() 

# setting 
qplot(carat, price, data=diamonds, color=I("black")) 
# equivalent to ggplot(data=diamonds, aes(carat, price), color="black") + geom_point() 

。