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

Question

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

我正在开发基于 R 的 webapp，我想将某些参数传递给 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 \ 并不真正意味着escape，而是文字\。

这里有一些代码说明了sep="\t" 在read.table 中的正确用法。只是为了好玩，我使用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