如何在 RStudio 中对原始字符“83”进行硬编码?

How do I hard code the raw-character "83" in RStudio?

在R中,有一个叫做raw-vector/raw-characters的东西。来自 "rawToChar" 和 "charToRaw" 函数等的一个。如果将原始向量放入控制台,它会被打印出来。一个这样的原始元素可能被打印为“83”。现在我想检查对于给定的原始字符,它是否等于打印为“83”的原始字符。所以我想将原始字符硬编码到我的代码中进行比较。我该怎么做?
我发现的唯一方法是使用 charToRaw("ƒ")。但是,这仅适用于控制台。将 ƒ 放入 RStudio 文件的源代码中很困难。试试看:

print("ƒ")

这将给出输出:
[1]“Æ”
如果打印语句在已编译的 RStudio 文件中(它只能在控制台中按预期工作)。

我尝试了以下 2 个,它对我有用

来自控制台

> print("ƒ")
[1] "ƒ"

函数内

> for (i in 1:3) {
+   print("ƒ")
+ }
[1] "ƒ"
[1] "ƒ"
[1] "ƒ"

你能打开文件 -> 使用编码重新打开 -> Select UTF-8 并尝试一次吗

83是原始值,即十六进制数。

你可以使用这个:

intToUtf8(8 * 16 + 3) == "ƒ"
#[1] TRUE

或这个

x <- rawToChar(as.raw(8*16+3))
Encoding(x) <- "latin1"
x == "ƒ"
#[1] TRUE

在源代码中硬编码 UTF-8 字符很危险,也没有必要。