如何将伪随机变量与字符串相关联？

Question

在 R 中，我正在生成一个文档，其中包含针对人员列表的随机部分。

但是，我希望同一份文档，发给同一个人但生成了多次，总是返回相同的号码。

例如，我对团队编号（A 或 B）进行抽样，并且我希望 P 提及文档的任何版本，例如 A。

我知道set.seed 函数，但这需要一个整数，其中我有字符串（人名）。那么，在我的情况下，有没有一种聪明的方法可以将字符串映射到整数？还是其他（更简单）的生成随机文档的解决方案？

Answer 1

也许将文本转换为十六进制或位会对您有所帮助：

# simple example
x <- charToRaw("Matthew")
y <- rawToBits(x)
packBits(y)
# [1] 4d 61 74 74 68 65 77
rawToChar(packBits(y))
# [1] "Matthew"

# with more data
df <- data.frame(names=c("Matthew M.", "Mark T.", "Luke S.", "John U."), stringsAsFactors = FALSE)
df$Raw <- lapply(df$names, FUN=charToRaw)
df$Bits <- lapply(df$Raw, FUN=rawToBits)

bitsToChar <- function(x) {rawToChar(packBits(x))}
df$Char <- lapply(df$Bits, FUN=bitsToChar)
df$Char
# [[1]]
# [1] "Matthew M."
# 
# [[2]]
# [1] "Mark T."
# 
# [[3]]
# [1] "Luke S."
# 
# [[4]]
# [1] "John U."