[解決済み】rbind(deparse.level, ...)でエラー：引数の列の数がRにマッチしていない

質問

テストデータとトレーニングデータで特徴量解析を行おうとしています。Pythonには慣れていますが、Rは初めてです。

#Row binding train & test set for feature engineering
train_test = rbind(train, test)

訓練データとテストデータで列の数が違うようなのですが。これを解決して、両方のデータフレームに共通するカラムだけを残すにはどうしたらよいでしょうか？

Error in rbind(deparse.level, ...) : 
  numbers of columns of arguments do not match

解決方法は？

共通の列を見つける。

common_cols <- intersect(colnames(train), colnames(test))

ここで、rbindを実行します。

train_test=rbind(subset(train, select = common_cols), 
  subset(test, select = common_cols))