获取列名称的标签（hmisc）

Question

我已经使用Hmisc库将标签附加到列名，您可以按照以下步骤进行操作。

example

library(Hmisc)
label(mydata$myvar) <- "Variable label for variable myvar" 

结果：

可以使用称为df的df为整个Lbl设置标签，在第一栏中输入名称，在第一栏中输入标签；

  Varcode Variables
1 P       Power
2 H       Happiness

如下：

# set labels
for (i in seq_len(nrow(Lbl))) {
  Hmisc::label(df2[[Lbl$Varcode[i]]]) <- Lbl$Variables[i]
}

但是，我的问题是，如果我有一个标记的数据框，如何将它们取出（即，反转命令）？

Answer 1

在这里，我们从每一列中提取labels，然后stack到具有两列的data.frame中

setNames(stack(lapply(df2, label))[2:1], c("Varcode", "Variables"))