获取列名的标签(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"))