数値ベクトルで識別される列に基づいてデータフレームを再構築するにはどうすればよいですか？

Question

私はいくつかのGA駆動検索を完了するためにRを使用しています。 c(0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0)：私のGAスクリプトから返さ

が得られた染色体であり、例は、長さの二進数字として40

を返さ。

私はまた、40列の対応するデータフレームを持っています。

数値ベクトルのデータを使用して、データフレームを効率的に構築（または再構築）して、数値ベクトルの1で表される列のみを含むようにするにはどうすればよいですか？

Answer 1

サンプルdata.frameを構築し、Xにあなたのサンプルベクトルを割り当てる：

df <- as.data.frame(matrix(sample(1:100, 400, replace=T), ncol=40)) 
x <- c(0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0) 

私はサブセットすることができます

df[ ,x==1] 

か：

df[, as.logical(x)]