วิธีการพล็อตฮิสโตแกรมหลายอันใน r (พร้อมตัวอย่าง)

คุณสามารถใช้ไวยากรณ์ต่อไปนี้เพื่อลงจุดหลายฮิสโตแกรมบนแผนภูมิเดียวกันใน ฐาน R :

 hist(data1, col=' red ')
hist(data2, col=' blue ', add= TRUE )

และคุณสามารถใช้ไวยากรณ์ต่อไปนี้เพื่อลงจุดหลายฮิสโตแกรมใน ggplot2 :

 ggplot(df, aes(x = x_var, fill = grouping_var)) +
  geom_histogram(position = ' identity ', alpha = 0.4 )

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

วิธีที่ 1: วาดฮิสโตแกรมหลายๆ อันในฐาน R

รหัสต่อไปนี้แสดงวิธีการลงจุดหลายฮิสโตแกรมในการลงจุดเดียวในฐาน R:

 #make this example reproducible
set. seeds (1)

#define data
x1 = rnorm(1000, mean=0.8, sd=0.2)
x2 = rnorm(1000, mean=0.4, sd=0.1)

#plot two histograms in same graph
hist(x1, col=' red ', xlim=c(0, 1.5), main=' Multiple Histograms ', xlab=' x ')
hist(x2, col=' green ', add= TRUE )

#add legend
legend(' topright ', c(' x1 variable ', ' x2 variable '), fill=c(' red ', ' green ')) 

วิธีที่ 2: ลงจุดหลายฮิสโตแกรมใน ggplot2

รหัสต่อไปนี้แสดงวิธีการพล็อตฮิสโตแกรมหลายอันในพล็อตเดียวใน R โดยใช้ ggplot2 :

 library (ggplot2)

#make this example reproducible
set. seeds (1)

#create data frame
df <- data. frame (var = c(rep(' x1 ', 1000), rep(' x2 ', 1000) ),
                   value = c(rnorm(1000, mean=0.8, sd=0.1),
                             rnorm(1000, mean=0.4, sd=0.1)))

#view first six rows of data frame
head(df)

  var value
1 x1 0.7373546
2 x1 0.8183643
3 x1 0.7164371
4x1 0.9595281
5 x1 0.8329508
6 x1 0.7179532

#plot multiple histograms
ggplot(df, aes(x=value, fill=var)) +
  geom_histogram(color=' #e9ecef ', alpha=0.6, position=' identity ')

คุณสามารถเปลี่ยนสีของฮิสโตแกรมได้อย่างรวดเร็วโดยใช้ฟังก์ชัน scale_fill_manual() :

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

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

วิธีสร้างฮิสโตแกรมความถี่สัมพัทธ์ใน R
วิธีพล็อต Boxplot หลายอันในกราฟเดียวใน R
วิธีการพล็อตหลายบรรทัดในกราฟใน R