引用R數據框中的列

Question

我在按名稱引用數據框中的列時遇到問題。我已經開始提取沒有NA的行的功能：

prepare <- function(dataframe, attr1,attr2){ 
subset_na_still_there <- dataframe[!is.na(attr1) & !is.na(attr2),] 
subset_na_still_there2 <- subset(dataframe, !is.na(attr1) & !is.na(attr2)) 
### someother code goes here 
} 

但是，返回的子集仍然包含NA。我沒有得到任何錯誤。 這裏是一個related question

編輯： 選擇列，然後按編號引用它們開了竅：

prepare <- function(dataframe, attr1,attr2){ 
subset_cols <- dataframe[,c(attr1, attr2)] 
subset_gone <- subset_cols[!is.na(subset_cols[,1]) & !is.na(subset_cols[,2]),] 
} 

爲什麼第一個版本不會達到預期效果？

Answer 1

如何：

prepare <- function(x, attr1, attr2){ 
    x[!is.na(x[attr1]) & !is.na(x[attr2]),] 
} 

Answer 2

而不是創建自己的功能，嘗試subset：

subset(mydata, !is.na(attr1) & !is.na(attr2)) 

如果你想獲得與港定居在擺脫行的任何領域嘗試

na.omit(mydata) 

Answer 3

df <- data.frame(att1=c(1,NA,NA,10),att2=c(NA,1,2,3),val=c("a","z","e","r")) 

df 
    att1 att2 val 
1 1 NA a 
2 NA 1 z 
3 NA 2 e 
4 10 3 r 

test <- function(df,att1,att2){ 
df_no_na <- df[!is.na(att1) & !is.na(att2),] 
df_no_na 
} 

test(df,df$att1,df$att2) 
    att1 att2 val 
4 10 3 r 

這是工作我。你確定NA嗎？是is.na(df$att1)還是TRUE？