แยกคอลัมน์เฉพาะจากกรอบข้อมูล

ฉันมีเฟรมข้อมูล R ที่มี 6 คอลัมน์และฉันต้องการสร้างดาต้าเฟรมใหม่ที่มีเพียงสามคอลัมน์เท่านั้น

สมมติว่าเฟรมข้อมูลของฉันเป็นdfและฉันต้องการที่จะคอลัมน์สารสกัดA, BและEนี้เป็นเพียงคำสั่งฉันจะคิดออก:

 data.frame(df$A,df$B,df$E)

มีวิธีที่กะทัดรัดกว่านี้อีกไหม?

ใช้แพ็คเกจdplyrหาก data.frame ของคุณถูกเรียกว่าdf1:

library(dplyr)

df1 %>%
  select(A, B, E)

นอกจากนี้ยังสามารถเขียนได้โดยไม่ต้อง%>%ไปป์เป็น:

select(df1, A, B, E)

คุณสามารถเซตย่อยโดยใช้เวกเตอร์ของชื่อคอลัมน์ ฉันชอบวิธีนี้มากกว่าคนที่ปฏิบัติต่อชื่อคอลัมน์ราวกับว่าพวกเขาเป็นชื่อวัตถุ (เช่นsubset()) โดยเฉพาะอย่างยิ่งเมื่อเขียนโปรแกรมในฟังก์ชั่นแพคเกจหรือแอปพลิเคชัน

# data for reproducible example
# (and to avoid confusion from trying to subset `stats::df`)
df <- setNames(data.frame(as.list(1:5)), LETTERS[1:5])
# subset
df[,c("A","B","E")]

นี่คือบทบาทของsubset()ฟังก์ชัน:

> dat <- data.frame(A=c(1,2),B=c(3,4),C=c(5,6),D=c(7,7),E=c(8,8),F=c(9,9)) 
> subset(dat, select=c("A", "B"))
  A B
1 1 3
2 2 4

มีสองตัวเลือกที่ชัดเจน: Joshua Ulrich df[,c("A","B","E")]หรือ

df[,c(1,2,5)]

เช่นเดียวกับใน

> df <- data.frame(A=c(1,2),B=c(3,4),C=c(5,6),D=c(7,7),E=c(8,8),F=c(9,9)) 
> df
  A B C D E F
1 1 3 5 7 8 9
2 2 4 6 7 8 9
> df[,c(1,2,5)]
  A B E
1 1 3 8
2 2 4 8
> df[,c("A","B","E")]
  A B E
1 1 3 8
2 2 4 8

ด้วยเหตุผลบางอย่างเท่านั้น

df[, (names(df) %in% c("A","B","E"))]

ทำงานให้ฉัน ไวยากรณ์ข้างต้นทั้งหมดให้ผล "เลือกคอลัมน์ที่ไม่ได้กำหนด"

ที่ df1 เป็น data frame ดั้งเดิมของคุณ:

df2 <- subset(df1, select = c(1, 2, 5))

นอกจากนี้คุณยังสามารถใช้sqldfแพคเกจที่ดำเนินการเลือกในกรอบข้อมูล R เป็น:

df1 <- sqldf("select A, B, E from df")

สิ่งนี้จะให้ผลลัพธ์เมื่อเฟรมข้อมูลdf1มีคอลัมน์: A, B, E

คุณสามารถใช้with:

with(df, data.frame(A, B, E))

df<- dplyr::select ( df,A,B,C)

นอกจากนี้คุณสามารถกำหนดชื่ออื่นให้กับข้อมูลที่สร้างขึ้นใหม่

data<- dplyr::select ( df,A,B,C)

[ และเซตย่อยไม่สามารถทดแทนได้:

[ จะคืนค่าเวกเตอร์ถ้าเลือกคอลัมน์เดียวเท่านั้น

df = data.frame(a="a",b="b")    

identical(
  df[,c("a")], 
  subset(df,select="a")
) 

identical(
  df[,c("a","b")],  
  subset(df,select=c("a","b"))
)