r - 粘贴/连接涉及反斜杠的字符串

Question

我有一个接受参数的函数bm（然后传递给format()）。在函数的某个时刻，我想使用相同的参数bm并将其粘贴到向量的元素中。正如您从最小示例中看到的那样，字符串并不相同。我如何（给定参数bm）使用参数bm和某种......来获得与（即代替）paste()相同的结果？format()\\,\\\\,

bm <- "\\\\,"
x <- format(c(1,10000), big.mark=bm, trim=TRUE)
y <- x
y[1] <- paste0(bm, x[1])
y # both components should contain \\,

Answer 1

不确定这是否对您\\\\,1有帮助，但长度为 4 且10\\,000长度为 7。我假设您希望 y[2] 等于 R string 10\\\\,000。一种方法是encodeString()在操作字符串后使用：

bm <- "\\\\," 
x <- encodeString(format(c(1,10000), big.mark=bm, trim=TRUE))
y <- x
y[1] <- paste0(bm, x[1])
y
# [1] "\\\\,1"     "10\\\\,000"