r - データフレームから列を削除できません。出力が論理ベクトルに変わります

Question

data.frame関数から取得した I に何か問題があるようcSplitです。

NAs以下のコードを使用しないと、列を抽出できません。

data_places <- data_table[ , colSums(is.na(data_table)) == 0 ]

出力は、NA を持つ行を持つ列を持たないNamed logiではなく、ベクトルです。data.frame

この問題は、主にパッケージの関数のdata.frame出力によるものです。この問題は、パッケージを使用しても表示されます。cSplitsplitstackshapedata.table

関数の出力のdata.frame列を抽出する新しいものを作成しようとしましたが、上記のコードは正常に動作します。data.framecSplit

cSplitのdata.frame出力の何が問題なのですか?

これが私のコードのサンプルです：

library(splitstackshape)
data <- data.frame(V1=c("Place1-Place1-Place1-Place1-Place3-Place5",
          "Place1-Place4-Place2-Place3-Place3-Place5-Place5",
          "Place6-Place6",
          "Place1-Place2-Place3-Place4"))

data_table <- cSplit(data, "V1", sep="-", direction = "wide")
data_places <- data_table[ , colSums(is.na(data_table)) == 0 ]
data_places
str(data_places)