数据框中每个变量的级别数

Question

我想计算每个变量的级别数，以查看它们中是否只有一个级别 我的代码是这样的

for (i in colnames(dat)){
print(nlevels(dat$i))
}