ละเว้นแถวที่มีคอลัมน์เฉพาะของ NA

ฉันต้องการทราบวิธีละเว้นNAค่าในกรอบข้อมูล แต่เฉพาะในบางคอลัมน์ที่ฉันสนใจ

ตัวอย่างเช่น,

DF <- data.frame(x = c(1, 2, 3), y = c(0, 10, NA), z=c(NA, 33, 22))

แต่ฉันต้องการละเว้นข้อมูลที่yเป็นNAดังนั้นผลลัพธ์ควร

  x  y  z
1 1  0 NA
2 2 10 33

na.omitNAดูเหมือนลบแถวทั้งหมดมีการใด ๆ

ใครช่วยฉันออกจากคำถามง่าย ๆ นี้ได้ไหม

แต่ถ้าตอนนี้ฉันเปลี่ยนคำถามเช่น:

DF <- data.frame(x = c(1, 2, 3,NA), y = c(1,0, 10, NA), z=c(43,NA, 33, NA))

หากฉันต้องการละเว้นเพียงอย่างเดียวx=naหรือz=naฉันจะใส่|ฟังก์ชันไว้ในตำแหน่งใดได้บ้าง

คุณสามารถใช้complete.casesฟังก์ชั่นและใส่ลงในฟังก์ชั่นดังนี้:

DF <- data.frame(x = c(1, 2, 3), y = c(0, 10, NA), z=c(NA, 33, 22))

completeFun <- function(data, desiredCols) {
  completeVec <- complete.cases(data[, desiredCols])
  return(data[completeVec, ])
}

completeFun(DF, "y")
#   x  y  z
# 1 1  0 NA
# 2 2 10 33

completeFun(DF, c("y", "z"))
#   x  y  z
# 2 2 10 33

แก้ไข: ส่งคืนแถวเท่านั้นโดยไม่มีNAs

หากคุณต้องการกำจัดแถวทั้งหมดอย่างน้อยหนึ่งNAแถวในคอลัมน์ใด ๆ ให้ใช้complete.casesฟังก์ชันตรงขึ้น:

DF[complete.cases(DF), ]
#   x  y  z
# 2 2 10 33

หรือถ้าcompleteFunฝังอยู่ในเวิร์กโฟลว์ของคุณแล้ว)

completeFun(DF, names(DF))

ใช้ is.na

DF <- data.frame(x = c(1, 2, 3), y = c(0, 10, NA), z=c(NA, 33, 22))
DF[!is.na(DF$y),]

Hadley tidyrเพิ่งได้รับฟังก์ชั่นที่น่าทึ่งนี้drop_na

library(tidyr)
DF %>% drop_na(y)
  x  y  z
1 1  0 NA
2 2 10 33

ใช้ 'ส่วนย่อย'

DF <- data.frame(x = c(1, 2, 3), y = c(0, 10, NA), z=c(NA, 33, 22))
subset(DF, !is.na(y))

มันเป็นไปได้ที่จะใช้na.omitสำหรับdata.table:

na.omit(data, cols = c("x", "z"))

ลองสิ่งนี้:

cc=is.na(DF$y)
m=which(cc==c("TRUE"))
DF=DF[-m,]

<NA>แถวละเว้นถ้าทั้งสองคอลัมน์ที่เฉพาะเจาะจงประกอบด้วย

DF[!is.na(DF$x)&!is.na(DF$z),]

ลองทำสิ่งนี้:

DF %>% t %>% na.omit %>% t

มัน transposes กรอบข้อมูลและละเว้นแถว null ซึ่งเป็น 'คอลัมน์' ก่อนขนย้ายและจากนั้นคุณแปลงกลับ