R 将字符串转换为颜色十六进制代码

是否有一个函数可以将字符串转换为颜色十六进制代码

例如：

foo->F123FA

将一个4位数的数字转换成十六进制代码也完全可以，但问题是我的数字非常相似

---

有人知道一个好的解决方案吗？

我自己找到了一个解决方案，提示如下：

library(digest)
a <- 'test'
print(a)
a <- sapply(a, digest, algo = "sha1")
hex <- paste0('#', substr(a, 0, 6))
print(hex)

---

听起来像是XY问题。为什么需要这些？这些字符串和/或数字的性质是什么？您是否正在尝试从颜色名称转换为十六进制代码？如果是，这些数字是什么？如果没有，你能详细说明你要完成的任务吗？输入的性质是什么，输入和输出之间的预期关系是什么？我有一个4位数的ID列表，希望为每个数字动态分配一种颜色。我的第一个想法是对FF+数字进行压缩以获得十六进制代码，但问题是有一些相似的数字，因此颜色看起来也很相似。