วิธีสร้างคำอธิบายแนวนอนใน base r (2 วิธี)

คุณสามารถใช้วิธีการต่อไปนี้เพื่อสร้างคำอธิบายแนวนอนในพล็อต R ฐาน:

วิธีที่ 1: ใช้อาร์กิวเมนต์แนวนอน

 legend(' bottom ', fill=fill_cols, legend=c(' A ', ' B ', ' C ', ' D ', ' E ', ' F '),
        horiz= TRUE , inset=c(0, -.1), xpd= TRUE )

ตัวอย่างนี้สร้างคำอธิบายแนวนอนใต้โครงเรื่องโดยที่แต่ละองค์ประกอบของคำอธิบายอยู่ในบรรทัดเดียวกัน

วิธีที่ 2: ใช้อาร์กิวเมนต์ ncol

 legend(' bottom ', fill=fill_cols, legend=c(' A ', ' B ', ' C ', ' D ', ' E ', ' F '),
        ncol=3, inset=c(0, -.15), xpd= TRUE )

ตัวอย่างนี้สร้างคำอธิบายแนวนอนใต้โครงเรื่องโดยมีสามคอลัมน์

อาร์กิวเมนต์ inset(x, y) ควบคุมตำแหน่งของคำอธิบาย ด้วยการใช้ค่าลบสำหรับค่า y เราสามารถผลักคำอธิบายลงไปนอกโครงเรื่องได้

อาร์กิวเมนต์ xpd=TRUE ช่วยให้เราสามารถวางคำอธิบายไว้นอกพล็อตเรื่องในขณะที่ยังคงมองเห็นได้ในพื้นที่พล็อต

ตัวอย่างต่อไปนี้แสดงวิธีการใช้แต่ละวิธีในทางปฏิบัติ

ตัวอย่างที่ 1: ใช้อาร์กิวเมนต์ horiz เพื่อสร้างคำอธิบายแนวนอนในฐาน R

รหัสต่อไปนี้แสดงวิธีการใช้อาร์กิวเมนต์ horiz=TRUE ในฟังก์ชัน legend() เพื่อสร้างคำอธิบายแนวนอนที่ด้านล่างของพล็อต R ฐาน:

 #create vector of values
data <- c(4, 10, 7, 5, 4, 3)

#specify fill colors to use
fill_cols <- c(' red ', ' pink ', ' blue ', ' green ', ' purple ', ' brown ')

#create bar plot to visualize values in vector
barplot(data, col=fill_cols)

#add legend to bottom of plot
legend(' bottom ', fill=fill_cols, legend=c(' A ', ' B ', ' C ', ' D ', ' E ', ' F '),
        horiz= TRUE , inset=c(0, -.1), xpd= TRUE ) 

โปรดทราบว่ามีการสร้างคำอธิบายแนวนอนและวางไว้ที่ด้านล่างของโครงเรื่อง

รู้สึกอิสระที่จะเล่นกับค่าของอาร์กิวเมนต์ ที่ใส่เข้าไป เพื่อปรับตำแหน่งของคำอธิบายเช่นกัน

ตัวอย่างเช่น เราสามารถทำให้ค่า y ของอาร์กิวเมนต์ ที่ใส่เข้าไป เป็นลบมากยิ่งขึ้นเพื่อทำให้คำอธิบายแผนภูมิต่ำลง:

 #create vector of values
data <- c(4, 10, 7, 5, 4, 3)

#specify fill colors to use
fill_cols <- c(' red ', ' pink ', ' blue ', ' green ', ' purple ', ' brown ')

#create bar plot to visualize values in vector
barplot(data, col=fill_cols)

#add legend to bottom of plot
legend(' bottom ', fill=fill_cols, legend=c(' A ', ' B ', ' C ', ' D ', ' E ', ' F '),
        horiz= TRUE , inset=c(0, -.2), xpd= TRUE ) 

โปรดทราบว่าคำอธิบายแนวนอนถูกผลักให้ต่ำกว่าโครงเรื่องด้วยซ้ำ

ตัวอย่างที่ 2: ใช้อาร์กิวเมนต์ ncol เพื่อสร้างคำอธิบายแนวนอนในฐาน R

รหัสต่อไปนี้แสดงวิธีใช้อาร์กิวเมนต์ ncol ในฟังก์ชัน legend() เพื่อสร้างคำอธิบายแนวนอนโดยมีสามคอลัมน์ที่ด้านล่างของพล็อต R ฐาน:

 #create vector of values
data <- c(4, 10, 7, 5, 4, 3)

#specify fill colors to use
fill_cols <- c(' red ', ' pink ', ' blue ', ' green ', ' purple ', ' brown ')

#create bar plot to visualize values in vector
barplot(data, col=fill_cols)

#add legend to bottom of plot
legend(' bottom ', fill=fill_cols, legend=c(' A ', ' B ', ' C ', ' D ', ' E ', ' F '),
        ncol=3, inset=c(0, -.15), xpd= TRUE ) 

โปรดทราบว่ามีการสร้างคำอธิบายแนวนอนสามคอลัมน์และวางไว้ที่ด้านล่างของโครงเรื่อง

คุณสามารถปรับเปลี่ยนค่าของอาร์กิวเมนต์ ncol เพื่อสร้างคำอธิบายแผนภูมิด้วยจำนวนคอลัมน์ที่แตกต่างกันได้

แหล่งข้อมูลเพิ่มเติม

บทช่วยสอนต่อไปนี้จะอธิบายวิธีดำเนินการงานทั่วไปอื่นๆ ใน R:

วิธีเปลี่ยนขนาดคำอธิบายแผนภูมิในพล็อต Base R
วิธีวาดตำนานนอกโครงเรื่องใน R
วิธีเปลี่ยนตำแหน่งคำอธิบายแผนภูมิในแปลง R พื้นฐาน