将长度为一个字符转换为一字节字符串

Question

好吧，我承认这个标题有点误导。我目前脑死亡，所以我可能在这里遗漏了一些明显的东西。

我正在开发 R 驱动的 web 应用程序，我想将某些参数传递给 read.table 函数 - sep 等。如果我将单字节字符作为 sep 参数传递，那么一切都会像魅力一样工作：,, ;, |...但是如果我尝试传递 \t ，则会收到错误：

invalid 'sep' value: must be one byte

当然，发生这种情况是因为 \t 实际上被转义了 (\\t ）。我是否有机会转义，并“按原样”传递它 - 即单字节字符串？

Answer 1

您需要将 sep="\t" 作为参数写入 read.table。

对于制表符，t 会被转义。换句话说，您告诉 R t 并不真正意味着 t，而是 tab。如果您使用 \\ 转义 \，那么您就是在告诉 R，\ 并不真正意味着 转义 而是文字 \。

下面是一些代码，说明了 read.table 中 sep="\t" 的正确用法。只是为了好玩，我使用 textConnection 使用连接进行写入和读取，而不是使用磁盘上的文件：

# Create a tab delimited file
zz <- textConnection("foo", "w")
write.table(matrix(1:12, ncol=3), file=zz, sep="\t")
close(zz)
foo

# The simple way:
tabsep <- "\t"

# The hard way, or if data was passed from a web app and you need to clean it
tabsep <- gsub("\\\\t", "\t", "\\t")


# Read a tab delimited file
zz <- textConnection(foo)
read.table(zz, sep=tabsep)
close(zz)

这会产生以下输出：

  V1 V2 V3
1  1  5  9
2  2  6 10
3  3  7 11
4  4  8 12