私はテーブルを持っているとしましょう:
0 4.5 12 14 24 36 47
6 1 1 1 7 1 3
0
テーブルに存在する場合、ラベル付けされた列を削除したいと思います。コマンドt <- t[,!'0', with=FALSE]
を実行しても、目的の結果が得られませんでした (エラーが発生しました)。
私はテーブルを持っているとしましょう:
0 4.5 12 14 24 36 47
6 1 1 1 7 1 3
0
テーブルに存在する場合、ラベル付けされた列を削除したいと思います。コマンドt <- t[,!'0', with=FALSE]
を実行しても、目的の結果が得られませんでした (エラーが発生しました)。
これでうまくいくはずです
> x <- setNames(c(6,1,1,1,7,1,3), c("0", "4.5", "12", "14", "24", "36", "47" ))
> x # your data
0 4.5 12 14 24 36 47
6 1 1 1 7 1 3
> x <- x[names(x) != "0"]
> x # what you want
4.5 12 14 24 36 47
1 1 1 7 1 3
差し引くことができます。
x[- which(names(x) == '0')]