ตอบ: วิธีการวาดวงกลมในเส้นทาง: พร้อมตัวอย่าง

คุณสามารถใช้วิธีการต่อไปนี้เพื่อวาดวงกลมในเส้นทางใน R:

วิธีที่ 1: วาดวงกลมโดยใช้ฐาน R

 library (plotrix)

#create scatterplot
plot(x, y)

#add circle at specific (x, y) coordinates with specific radius
draw.draw. circle (x=3, y=8, radius=.5)

วิธีที่ 2: วาดวงกลมโดยใช้ ggplot2

 library (ggplot2)
library (ggforce)

#create scatter plot with circle at specific location with specific radius
ggplot(data = df, aes(x, y)) +
  geom_point() +
  geom_circle(aes(x0=3, y0=8, r=1), inherit. aes = FALSE ) +
  coordinate_fixed()

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

ตัวอย่างที่ 1: วาดวงกลมโดยใช้ฐาน R

หากต้องการวาดวงกลมบนพล็อต R พื้นฐาน คุณต้องติดตั้งและโหลดแพ็คเกจ plotrix ก่อน:

 install. packages (' plotrix ')
library (plotrix)

ต่อไป เราสามารถใช้ฟังก์ชัน Draw.circle() จากแพ็คเกจ plotrix เพื่อเพิ่มวงกลมให้กับคลาวด์จุด R ฐาน:

 #create data frame
df <- data. frame (x=c(1, 2, 2, 3, 3, 4, 8),
                 y=c(2, 4, 5, 4, 7, 9, 10))

#create scatterplot
plot(df$x, df$y)

#add circle
draw.draw. circle (x=3, y=8, radius=.5) 

คุณยังสามารถใช้ฟังก์ชัน Draw.circle() หลายครั้งเพื่อวาดวงกลมหลายวงบนเส้นทางเดียวกัน:

 #create data frame
df <- data. frame (x=c(1, 2, 2, 3, 3, 4, 8),
                 y=c(2, 4, 5, 4, 7, 9, 10))

#create scatterplot
plot(df$x, df$y)

#add multiple circles to plot
draw.draw. circle (x=3, y=8, radius=.5)
draw.draw. circle (x=4, y=5, radius=.5, border=' red ', col=' lightblue ', lwd=5, lty=' dashed ')

โปรดสังเกตว่ามีการเพิ่มวงกลมหลายวงลงในพล็อตที่พิกัด (x, y) ที่เราระบุ

ตัวอย่างที่ 2: วาดวงกลมโดยใช้ ggplot2

หากต้องการวาดวงกลมบนพล็อตใน ggplot2 คุณต้องติดตั้งและโหลดแพ็คเกจ ggplot2 และ ggforce ก่อน:

 install. packages (' ggplot2 ')
install. packages (' ggforce ')
library (ggplot2)
library (ggforce)

ต่อไป เราสามารถใช้ฟังก์ชัน geom_circle() จากแพ็คเกจ ggforce เพื่อเพิ่มวงกลมลงใน Scatterplot ใน ggplot2:

 #create data frame
df <- data. frame (x=c(1, 2, 2, 3, 3, 4, 8),
                 y=c(2, 4, 5, 4, 7, 9, 10))

#create scatter plot with circle
ggplot(data = df, aes(x, y)) +
  geom_point() +
  geom_circle(aes(x0=3, y0=8, r=1), linetype=' dashed ', color=' red ',
              fill=' lightblue ', lwd=1.5, inherit. aes = FALSE ) +
  coordinate_fixed() 

วงกลมวางอยู่ในพิกัดที่แน่นอน (x, y) ที่เราระบุ

หมายเหตุ : หากคุณไม่ได้ใช้อาร์กิวเมนต์ coord_fixed() วงกลมอาจปรากฏเป็นรูปวงรี

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

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

วิธีสร้าง Scatterplot ใน R พร้อมตัวแปรหลายตัว
วิธีติดป้ายกำกับจุดบน Scatterplot ใน R
วิธีเพิ่มสมการการถดถอยให้กับพล็อตใน R