R - データフレームの因子列のみを選択する

Question

データフレームから因子列のみを選択しようとしています。例は次のとおりです。

bank[,apply(bank[,names(bank)!="id"], is.factor)] 

しかし、コードは奇妙な動作をします。ステップバイステップ：

sapply(bank[,names(bank)!="id"], is.factor) 

私が取得：

age   sex  region  income  married children   car 
     FALSE  TRUE  TRUE  FALSE  TRUE  FALSE  TRUE 
    save_act current_act mortgage   pep  ageBin 
     TRUE  TRUE  TRUE  TRUE  TRUE 

はOKに見えます。

bank[,sapply(bank[,names(bank)!="id"], is.factor)] 

しかし、結果として、私は、元の銀行のデータフレームのように、すべて同じ列を取得する：今、私はちょうど次のステップにTRUE/FALSEのこの行列を渡すと、私は必要な列のみを取得することを前提としています。何も除外されません。私はそれを試してみましたが、解決策を見つけることができません。私が間違っていることについてのアドバイスはありますか？ d.b @

Answer 1

#DATA 
df = mtcars 
colnames(df) = gsub("mpg","id",colnames(df)) 
df$am = as.factor(df$am) 
df$gear = as.factor(df$gear) 
df$id = as.factor(df$id) 

#Filter out 'id' after selecting factors 
df[,sapply(df, is.factor) & colnames(df) != "id"] 

Answer 2

df = mtcars 
colnames(df) = gsub("mpg","id",colnames(df)) 
df$am = as.factor(df$am) 
df$gear = as.factor(df$gear) 
df$id = as.factor(df$id) 

library(dplyr) 
df %>% select_if(is.factor) %>% select(-id)