在没有换行符的情况下将字符串放在剪贴板上

Question

我有一个自定义函数，它将剪贴板上带有反斜杠的路径转换为带有正斜杠的路径并将其粘贴回剪贴板上。麻烦的是，当它被粘贴回来时，它带有一个换行符。我似乎找不到这个换行符的来源，因为它似乎不是换行符：

btf <- function(){
  backstring <- readClipboard()
  forstring <- gsub("\\\\", "/", backstring)
  writeClipboard(forstring)
}

所以要使用示例路径：C:\path\to\folder
1.复制路径
2.在R中运行btf()
3.粘贴

粘贴后的副本现在有一个换行符。我在 Windows 7 下运行 R 3.0.1。
如何防止出现此换行符？

Answer 1

使用：

btf <- function(){
  backstring <- readClipboard()
  forstring <- gsub("\\\\", "/", backstring)
  writeClipboard(charToRaw(paste0(forstring, ' ')))
}