Получение меток имен столбцов (hmisc)

Question

Я использовал библиотеку Hmisc для прикрепления меток к именам столбцов, что можно сделать следующим образом.

пример

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