v1 = c(1,2,3)
v2 = c("a","b",NA)
X = data.frame(v1,v2)
f = function(X,d){
subset(X,is.na(d)==0)
}
f(X,"v2")
特定の列 (関数の引数に入力された) が欠落していない X のサブセットを取得するにはどうすればよいですか?
注: 関数は関数subset
内では使用できませんが、対話的にのみ使用してください (こちらを参照)。
f <- function(X, d) {
X[!is.na(X[d]), ]
}
> f(X,"v2")
v1 v2
1 1 a
2 2 b
complete.cases を使用すると、列名のベクトルを入力できます。
f <- function(X,d) {
X[complete.cases(X[,d]),]
}
関数は必要ありません。ただ行う:
X[!is.na(X$v2),]