R语言十进制转十六进制向量问题：如何将10-15替换为A-F？

我来帮你搞定这个问题！核心就是把转换后得到的10-15这些数值，映射成对应的十六进制字母A-F就行，下面给你两种实用的修改思路，直接就能用到你的代码里：

方法一：结果向量批量替换 #

如果你的现有代码已经能生成包含数字的十六进制向量（比如c(10, 15)这种），可以直接用映射表把数字替换成字母：

# 先定义数字到十六进制字符的映射表（R索引从1开始，所以数字0对应第1位）
hex_mapping <- c("0", "1", "2", "3", "4", "5", "6", "7", "8", "9",
                 "A", "B", "C", "D", "E", "F")

# 假设你的现有结果是这个向量
raw_hex_digits <- c(10, 5, 15, 3)

# 替换成标准十六进制字符
final_hex <- hex_mapping[raw_hex_digits + 1]
print(final_hex)  # 输出: "A" "5" "F" "3"

方法二：计算过程中直接转换字母 #

如果是在循环计算每一位十六进制数的时候，可以直接判断余数，把10-15转换成对应的字母，这样一步到位：

decimal_to_hex_vec <- function(x) {
  # 处理0的特殊情况
  if (x == 0) return("0")
  
  hex_result <- c()
  while (x > 0) {
    remainder <- x %% 16
    # 判断余数是否需要转字母
    if (remainder >= 10) {
      # 用R内置的LETTERS向量（A-Z），10对应A(10-9=1)，15对应F(15-9=6)
      digit <- LETTERS[remainder - 9]
    } else {
      digit <- as.character(remainder)
    }
    # 把新得到的位放在向量前面（因为计算是从低位到高位）
    hex_result <- c(digit, hex_result)
    x <- x %/% 16
  }
  return(hex_result)
}

# 测试示例
decimal_to_hex_vec(305)  # 输出: "1" "3" "1" （对应十进制305=1*16²+3*16+1）
decimal_to_hex_vec(2024) # 输出: "7" "E" "8" （2024=7*16²+14*16+8）

如果需要小写字母（a-f），把代码里的LETTERS换成letters就行，R内置了这个小写字母向量。

内容的提问来源于stack exchange，提问作者user9476336