如何在R语言中使用for循环获取多个变量的levels

我需要查看数据框myd中9个变量（tel_1到tel_9）的levels，原本逐个编写的代码如下：

levels(myd$tel_1)
levels(myd$tel_2)
levels(myd$tel_3)
...

为了避免重复代码，我尝试用for循环优化，但运行后控制台无任何输出，也不报错：

block <-
  c("tel_1",
    "tel_2",
    "tel_3",
    "tel_4",
    "tel_5",
    "tel_6",
    "tel_7",
    "tel_8",
    "tel_9")
for (j in block) {
  levels(myd[[j]])
}

问题原因 #

R的for循环中，表达式的计算结果不会自动打印到控制台——只有在交互式环境下单独执行levels(myd[[j]])时才会输出，循环里必须显式调用输出函数才能看到结果。

解决方法 #

方法1：修改for循环，添加显式输出

可以用print()直接输出levels，或者搭配cat()先打印变量名，让输出更清晰：

block <- c("tel_1", "tel_2", "tel_3", "tel_4", "tel_5", "tel_6", "tel_7", "tel_8", "tel_9")
for (j in block) {
  cat("变量", j, "的levels：\n")
  print(levels(myd[[j]]))
  cat("\n") # 空行分隔，提升可读性
}

方法2：用lapply替代for循环（更简洁）

不需要编写循环，直接用lapply批量处理，它会返回一个包含所有变量levels的列表，R会自动打印这个列表：

block <- c("tel_1", "tel_2", "tel_3", "tel_4", "tel_5", "tel_6", "tel_7", "tel_8", "tel_9")
lapply(myd[block], levels)

内容的提问来源于stack exchange，提问作者el_