ลบคำอธิบายแผนภูมิ ggplot 2.2

ฉันพยายามรักษาตำนานของเลเยอร์หนึ่ง (ราบรื่น) และลบคำอธิบายของอีกเลเยอร์ (จุด) ฉันได้พยายามปิดตำนานด้วยและguides(colour = FALSE)geom_point(aes(color = vs), show.legend = FALSE)

แก้ไข : เนื่องจากคำถามนี้และคำตอบนั้นได้รับความนิยมจึงเป็นตัวอย่างที่ทำซ้ำได้ตามลำดับ:

library(ggplot2)
ggplot(data = mtcars, aes(x = mpg, y = disp, group = gear)) +
geom_point(aes(color = vs)) +
geom_point(aes(shape = factor(cyl))) +
geom_line(aes(linetype = factor(gear))) +
geom_smooth(aes(fill = factor(gear), color = gear)) + 
theme_bw() 

จากตำราอาหารที่ bp เป็น ggplot ของคุณ:

ลบคำอธิบายแผนภูมิสำหรับสุนทรียศาสตร์เฉพาะ (เติม):

bp + guides(fill=FALSE)

มันสามารถทำได้เมื่อระบุสเกล:

bp + scale_fill_discrete(guide=FALSE)

สิ่งนี้จะลบตำนานทั้งหมด:

bp + theme(legend.position="none")

อาจมีวิธีแก้ไขปัญหาอื่นนี้:
รหัสของคุณคือ:

geom_point(aes(..., show.legend = FALSE))

คุณสามารถระบุshow.legendพารามิเตอร์หลังการaesโทรได้:

geom_point(aes(...), show.legend = FALSE)

ดังนั้นตำนานที่เกี่ยวข้องจะหายไป

เนื่องจากคำถามและคำตอบของผู้ใช้340026เป็นคำค้นหายอดนิยมฉันได้ทำตัวอย่างที่ทำซ้ำได้และภาพประกอบสั้น ๆ ของคำแนะนำที่ได้ทำไปพร้อมกับโซลูชันที่ตอบคำถามของ OP อย่างชัดเจน

หนึ่งในสิ่งที่ggplot2ทำและสิ่งที่ทำให้สับสนคือมันผสมผสานตำนานบางอย่างโดยอัตโนมัติเมื่อพวกมันเกี่ยวข้องกับตัวแปรเดียวกัน ตัวอย่างเช่นfactor(gear)ปรากฏสองครั้งหนึ่งครั้งlinetypeและครั้งเดียวfillส่งผลให้เกิดตำนานรวมกัน ในทางตรงกันข้ามมีรายการตำนานของตัวเองที่ยังไม่ได้รับการปฏิบัติเหมือนเช่นเดียวกับgear factor(gear)การแก้ปัญหาที่เสนอมักจะทำงานได้ดี แต่บางครั้งคุณอาจจำเป็นต้องแทนที่คำแนะนำ ดูตัวอย่างสุดท้ายของฉันที่ด้านล่าง

# reproducible example:
library(ggplot2)
p <- ggplot(data = mtcars, aes(x = mpg, y = disp, group = gear)) +
geom_point(aes(color = vs)) +
geom_point(aes(shape = factor(cyl))) +
geom_line(aes(linetype = factor(gear))) +
geom_smooth(aes(fill = factor(gear), color = gear)) + 
theme_bw() 

ลบตำนานทั้งหมด: @ user3490026

p + theme(legend.position = "none")

ลบตำนานทั้งหมด: @duhaime

p + guides(fill = FALSE, color = FALSE, linetype = FALSE, shape = FALSE)

ปิดตำนาน: @Tjebo

ggplot(data = mtcars, aes(x = mpg, y = disp, group = gear)) +
geom_point(aes(color = vs), show.legend = FALSE) +
geom_point(aes(shape = factor(cyl)), show.legend = FALSE) +
geom_line(aes(linetype = factor(gear)), show.legend = FALSE) +
geom_smooth(aes(fill = factor(gear), color = gear), show.legend = FALSE) + 
theme_bw() 

ลบการเติมเพื่อให้ linetype มองเห็นได้

p + guides(fill = FALSE)

เหมือนกับด้านบนผ่านฟังก์ชัน scale_fill_:

p + scale_fill_discrete(guide = FALSE)

และตอนนี้มีคำตอบที่เป็นไปได้สำหรับคำขอของ OP

"เพื่อรักษาตำนานของเลเยอร์หนึ่ง (ราบรื่น) และลบเลเจนด์ของอีกเลเยอร์ (จุด)"

เปิดบางอย่างปิดการโพสต์เฉพาะกิจ

p + guides(fill = guide_legend(override.aes = list(color = NA)), 
           color = FALSE, 
           shape = FALSE)  

หากแผนภูมิของคุณใช้ทั้งfillและcolorความสวยงามคุณสามารถลบคำอธิบายแผนภูมิได้ด้วย:

+ guides(fill=FALSE, color=FALSE)