在 R 中,在資料框中,我想獲取一列中樹種的代碼編號,并在資料框中創建一個新列,并使用如下所示的物種的重新編碼文本名稱。我可以創建一個樹名 = 代碼號的矩陣,但是如何將其應用于僅包含數值的長列和混合列?
> treeco <- c(4, 3, 4, 5, 3, 2, 2, 1, 4)
> spcode <- c("oak" = 1, "ash" = 2, "elm" = 3, "beech" = 4, "hazel" = 5)
> treesp <- data.frame(spcode)
> treesp
species
oak 1
ash 2
elm 3
beech 4
hazel 5
這是我正在尋找的解決方案:
treeco spcode
1 4 beech
2 3 elm
3 4 beech
4 5 hazel
5 3 elm
6 2 ash
7 2 ash
8 1 oak
9 4 beech
uj5u.com熱心網友回復:
基數R
data.frame(treeco, answer = names(spcode)[treeco])
# treeco answer
# 1 4 beech
# 2 3 elm
# 3 4 beech
# 4 5 hazel
# 5 3 elm
# 6 2 ash
# 7 2 ash
# 8 1 oak
# 9 4 beech
dplyr
當列名與環境中的某個列名匹配時,可能會有些混亂,因此為了演示起見,我將treeco在小標題中重命名,以便清楚使用的是哪個。
library(dplyr)
tibble(tc = treeco) %>%
mutate(answer = names(spcode)[tc])
# # A tibble: 9 x 2
# tc answer
# <dbl> <chr>
# 1 4 beech
# 2 3 elm
# 3 4 beech
# 4 5 hazel
# 5 3 elm
# 6 2 ash
# 7 2 ash
# 8 1 oak
# 9 4 beech
還有另一種方法可以讓您引入不止一個額外的列:加入/合并。
treecodes <- data.frame(code = spcode, tree = names(spcode))
set.seed(42)
treecodes$rand <- sample(100, size = nrow(treecodes), replace = TRUE)
treecodes
# code tree rand
# oak 1 oak 49
# ash 2 ash 65
# elm 3 elm 25
# beech 4 beech 74
# hazel 5 hazel 100
trees <- data.frame(code = treeco)
trees
# code
# 1 4
# 2 3
# 3 4
# 4 5
# 5 3
# 6 2
# 7 2
# 8 1
# 9 4
trees %>%
left_join(treecodes, by = "code")
# code tree rand
# 1 4 beech 74
# 2 3 elm 25
# 3 4 beech 74
# 4 5 hazel 100
# 5 3 elm 25
# 6 2 ash 65
# 7 2 ash 65
# 8 1 oak 49
# 9 4 beech 74
有關連接/合并的更多資訊,請參閱如何連接(合并)資料框(內部、外部、左、右)和內部連接、左連接、右連接和完全連接之間的區別是什么?.
轉載請註明出處,本文鏈接:https://www.uj5u.com/net/340512.html
上一篇:如何在熊貓資料框中添加復選框
下一篇:對熊貓中一列中的所有元素求和
