วิธีการลบคอลัมน์ตามชื่อใน r (พร้อมตัวอย่าง)

มีสามวิธีทั่วไปในการลบคอลัมน์ออกจาก data frame ใน R ตามชื่อ:

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

 #drop col2 and col4 from data frame
df_new <- subset(df, select = -c(col2, col4))

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

 library (dplyr)

#drop col2 and col4 from data frame
df_new <- df %>% select(-c(col2, col4))

วิธีที่ 3: ใช้ data.table

 library (data.table)

#convert data frame to data table
dt <- setDT(df)

#drop col2 and col4 from data frame
dt[, c(' col2 ', ' col4 '):=NULL]

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

 #create data frame
df <- data. frame (team=c('A', 'A', 'B', 'B', 'C', 'C', 'C', 'D'),
                 points=c(12, 15, 22, 29, 35, 24, 11, 24),
                 rebounds=c(10, 4, 4, 15, 14, 9, 12, 8),
                 assists=c(7, 7, 5, 8, 19, 14, 11, 10))

#view data frame
df

  team points rebound assists
1 A 12 10 7
2 to 15 4 7
3 B 22 4 5
4 B 29 15 8
5 C 35 14 19
6 C 24 9 14
7 C 11 12 11
8 D 24 8 10

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

รหัสต่อไปนี้แสดงวิธีการลบคอลัมน์ จุด และ ตัวช่วยเหลือออก จากกรอบข้อมูลโดยใช้ฟังก์ชัน subset() ในฐาน R:

 #create new data frame by dropping points and assists columns
df_new <- subset(df, select = -c(points, assists))

#view new data frame
df_new

  team rebounds
1 to 10
2 to 4
3 B 4
4 B 15
5 C 14
6 C 9
7 C 12
8 D 8

โปรดทราบว่าคอลัมน์ คะแนน และคอลัมน์ ช่วยเหลือ ได้ถูกลบออกจากกรอบข้อมูลใหม่แล้ว

ตัวอย่างที่ 2: ลบคอลัมน์ตามชื่อโดยใช้ dplyr

รหัสต่อไปนี้แสดงวิธีการลบคอลัมน์ point และ helper ออกจาก data frame โดยใช้ฟังก์ชัน select() จากแพ็คเกจ dplyr:

 library (dplyr)

#create new data frame by dropping points and assists columns
df_new <- df %>% select(-c(points, assists))

#view new data frame
df_new

  team rebounds
1 to 10
2 to 4
3 B 4
4 B 15
5 C 14
6 C 9
7 C 12
8 D 8

โปรดทราบว่าคอลัมน์ คะแนน และคอลัมน์ ช่วยเหลือ ได้ถูกลบออกจากกรอบข้อมูลใหม่แล้ว

ตัวอย่างที่ 3: ลบคอลัมน์ตามชื่อโดยใช้ data.table

รหัสต่อไปนี้แสดงวิธีการลบ จุด และคอลัมน์ ตัวช่วยออก จากกรอบข้อมูลโดยการตั้งค่าทั้งสองคอลัมน์เป็น NULL โดยใช้แพ็คเกจ data.table:

 library (data.table)

#convert data frame to data table
dt <- setDT(df)

#drop points and assists columns
dt[, c(' points ', ' assists '):=NULL]

#view updated data table
dt

   team rebounds
1: At 10
2: A 4
3:B4
4:B15
5:C14
6: C 9
7:C12
8: D 8

โปรดทราบว่าคอลัมน์ คะแนน และคอลัมน์ ช่วยเหลือได้ ถูกลบออกจากตารางข้อมูลใหม่แล้ว

หมายเหตุ : ทั้งสามวิธีให้ผลลัพธ์เดียวกัน แต่วิธี dplyr และ data.table มีแนวโน้มที่จะเร็วกว่าเมื่อทำงานกับชุดข้อมูลที่มีขนาดใหญ่มาก

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

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

วิธีลบคอลัมน์ที่มีค่า NA ใน R
วิธีจัดเรียงคอลัมน์ใหม่ใน R
วิธีเปลี่ยนชื่อคอลัมน์ใน R