วิธีการวาดสมการใน r (พร้อมตัวอย่าง)

คุณสามารถใช้ไวยากรณ์พื้นฐานต่อไปนี้เพื่อพล็อตสมการหรือฟังก์ชันใน R:

วิธีที่ 1: ใช้ Base R

 curve(2*x^2+5, from= 1 , to= 50 , , xlab=" x ", ylab=" y ")

วิธีที่ 2: ใช้ ggplot2

 library (ggplot2)

#define equation
my_equation <- function(x){2*x^2+5}

#plot equation
ggplot( data.frame (x=c( 1,50 )), aes (x=x)) + 
  stat_function(fun=my_equation)

ตัวอย่างทั้งสองนี้แสดงสมการ y = 2x ² + 5

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

ตัวอย่างที่ 1: พล็อตสมการในฐาน R

สมมติว่าคุณต้องการพล็อตสมการต่อไปนี้:

y = ^2×2 + 5

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

 curve(2*x^2+5, from= 1 , to= 50 , , xlab=" x ", ylab=" y ")

สิ่งนี้สร้างพล็อตต่อไปนี้:

หากคุณต้องการพล็อตจุดแทน เพียงระบุ type=”p” ในฟังก์ชัน Curve() :

 curve(2*x^2+5, from= 1 , to= 50 , , xlab=" x ", ylab=" y ", type=" p ")

สิ่งนี้สร้างพล็อตต่อไปนี้:

ตัวอย่างที่ 2: พล็อตสมการใน ggplot2

สมมติว่าคุณต้องการพล็อตสมการต่อไปนี้:

y = ^2×2 + 5

คุณสามารถใช้ไวยากรณ์ต่อไปนี้ใน ggplot2 เพื่อทำสิ่งนี้:

 library (ggplot2)

#define equation
my_equation <- function(x){2*x^2+5}

#plot equation
ggplot( data.frame (x=c( 1,50 )), aes (x=x)) + 
  stat_function(fun=my_equation)

สิ่งนี้สร้างพล็อตต่อไปนี้:

โปรดทราบว่าพล็อตนี้สอดคล้องกับที่เราสร้างในตัวอย่างก่อนหน้าในฐาน R

หมายเหตุ : หากต้องการพล็อตสมการอื่น เพียงเปลี่ยนค่าที่กำหนดไว้สำหรับตัวแปร my_equation

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

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

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