Jak zastąpić kody numeryczne etykietami wartości z tabeli odnośników?

To pytanie dotyczyto pytanie, ale nie do końca tak samo.

Powiedz, że mam tę ramkę danych

<code>df <- data.frame(
                id = c(1:6),
                profession = c(1, 5, 4, NA, 0, 5))
</code>

oraz ciąg z czytelnymi dla człowieka informacjami na temat kodów zawodów. Mówić,

<code>profession.code <- c(
                     Optometrists=1, Accountants=2, Veterinarians=3, 
                     `Financial analysts`=4,  Nurses=5)
</code>

Teraz szukam najłatwiejszego sposobu na zastąpienie wartości wdf$profession z tekstem znalezionym wprofession.code. Najlepiej bez użycia specjalnych bibliotek, chyba że znacznie skraca kod.

Chciałbym, żeby mój wynik końcowy był

<code>df <- data.frame(
                id = c(1:6),
                profession = c("Optometrists", "Nurses", 
                "Financial analysts", NA, 0, "Nurses"))
</code>

Każda pomoc byłaby bardzo mile widziana.

Dzięki, Eric

questionAnswers(3)

yourAnswerToTheQuestion