r - 如何从数据框中仅选择无序因素？

Question

我找不到一种简单的方法来从数据框中仅选择名义(无序因子)变量的列。

我尝试使用表达式“!is.ordered”来获取未排序的因子变量，但这会引发错误。

df=mtcars
df$am=as.factor(df$am)
df$carb=as.ordered(df$carb)
df2=df[,lapply(df,(is.factor & !is.ordered))]

!is.ordered 中的错误:参数类型无效

这也不起作用:

df=mtcars
df$am=as.factor(df$am)
df$carb=as.ordered(df$carb)
df2=df[,sapply(df, is.factor)]
ords=unlist(lapply(df2,is.ordered))
df2=df2[,-ords]
names(df2)

空

Answer 1

df[,sapply(df, function(x) is.factor(x) & !is.ordered(x)), drop = FALSE]

dplyr::select_if(df, ~ !is.ordered(.) & is.factor(.)) # Extended by is.factor of utubun

从可读性状态来看，如果更喜欢 dplyr 函数，但有一个 base R 替代品总是很好。