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

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字符串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"