使用R中的查找表查找/替换或映射

# 创建查找表
lookup_table <- data.frame(key = c("A", "B", "C"),
                           value = c(1, 2, 3))

# 查找/替换操作
data <- data.frame(key = c("A", "B", "C", "A"),
                   stringsAsFactors = FALSE)
merged_data <- merge(data, lookup_table, by = "key", all.x = TRUE)

# 结果
print(merged_data)

# 创建查找表
lookup_table <- list(A = 1, B = 2, C = 3)

# 查找操作
data <- c("A", "B", "C", "A")
found_values <- lookup_table[match(data, names(lookup_table))]

# 结果
print(found_values)

# 创建查找表
lookup_table <- c(A = 1, B = 2, C = 3)

# 查找操作
data <- c("A", "B", "C", "A")
found_values <- lookup_table[data]

# 结果
print(found_values)