获取列名的标签 (hmisc)

Question

我使用Hmisc 库将标签附加到列名，您可以按以下方式进行操作。

example

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

结果：

可以使用名为Lbl 的df 为整个df 设置标签，其中一列是名称，一列是标签；

  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"))