วิธีลบองค์ประกอบเฉพาะออกจากเวกเตอร์ใน r

คุณสามารถใช้ไวยากรณ์พื้นฐานต่อไปนี้เพื่อลบองค์ประกอบเฉพาะออกจากเวกเตอร์ใน R:

 #remove 'a', 'b', 'c' from my_vector
my_vector[! my_vector %in% c('a', 'b, 'c')]

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

ตัวอย่างที่ 1: ลบองค์ประกอบออกจากเวกเตอร์อักขระ

รหัสต่อไปนี้แสดงวิธีการลบองค์ประกอบออกจากเวกเตอร์อักขระใน R:

 #definevector
x <- c('Mavs', 'Nets', 'Hawks', 'Bucks', 'Spurs', 'Suns')

#remove 'Mavs' and 'Spurs' from vector
x <- x[! x %in% c('Mavs', 'Spurs')]

#view updated vector
x

[1] "Nets" "Hawks" "Bucks" "Suns" 

โปรดทราบว่า “Mavs” และ “Spurs” ได้ถูกลบออกจากเวกเตอร์แล้ว

ตัวอย่างที่ 2: ลบองค์ประกอบออกจากเวกเตอร์ตัวเลข

รหัสต่อไปนี้แสดงวิธีการลบองค์ประกอบออกจากเวกเตอร์ตัวเลขใน R:

 #define numeric vector
x <- c(1, 2, 2, 2, 3, 4, 5, 5, 7, 7, 8, 9, 12, 12, 13)

#remove 1, 4, and 5
x <- x[! x %in% c(1, 4, 5)]

#view updated vector
x

[1] 2 2 2 3 7 7 8 9 12 12 13

โปรดทราบว่าแต่ละค่าที่เกิดขึ้น 1, 4 และ 5 ได้ถูกลบออกจากเวกเตอร์แล้ว

นอกจากนี้เรายังสามารถระบุช่วงของค่าที่เราต้องการลบออกจากเวกเตอร์ตัวเลข:

 #define numeric vector
x <- c(1, 2, 2, 2, 3, 4, 5, 5, 7, 7, 8, 9, 12, 12, 13)

#remove values between 2 and 10
x <- x[! x %in% 2:10]

#view updated vector
x

[1] 1 12 12 13

โปรดทราบว่าทุกค่าระหว่าง 2 ถึง 10 ได้ถูกลบออกจากเวกเตอร์แล้ว

นอกจากนี้เรายังสามารถลบค่าที่มากกว่าหรือน้อยกว่าจำนวนที่ระบุได้:

 #define numeric vector
x <- c(1, 2, 2, 2, 3, 4, 5, 5, 7, 7, 8, 9, 12, 12, 13)

#remove values less than 3 or greater than 10
x <- x[!(x < 3 | x > 10)]

#view updated vector
x

[1] 3 4 5 5 7 7 8 9

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

วิธีลบเฟรมข้อมูลใน R
วิธีลบหลายคอลัมน์ใน R
วิธีเพิ่มค่าให้กับเวกเตอร์โดยใช้การวนซ้ำใน R