打印xtable gsub问题

Question

我有一个数据表，其中一些字段是从word文档中复制和粘贴的。当我试图从RMarkdown输出xtable打印时，会得到以下错误：

Error in gsub("&", "&", result, fixed = TRUE) : 
  input string 3 is invalid in this locale
Calls: <Anonymous> ... eval -> eval -> print -> print.xtable -> sanitize -> gsub
Execution halted

下面是一个可重复的例子。我把这个dataframe叫做test4：

library(xtable)
test4 <- structure(list(Record.ID = 81, Record.Type = "Type1", Short.Description = "specify 2-8\xb0C storage location",Record.State = "Work in Progress", Owner = "person1", Due.Date = "2014-08-14",days.left = -24), row.names = c(NA, -1L), .Names = c("Record.ID","Record.Type","Short.Description", "Record.State", "Owner","Due.Date", "days.left"), class = "data.frame")
print(xtable(test4,display=c("d","d","s","s","s","s","s","d")),include.rownames=F,floating=F,type="html")

我如何才能让xtable打印，即使我会有这样奇怪的字符？

FYI，当我在windows上运行它时，相同的操作不会出错。在debian上，我得到了错误。此外，我检查了我的地区，它是正确的设置。

Answer 1

那么，如果您要从Windows复制数据，则编码最有可能是"latin1“。我猜debian的默认编码是"UTF-8“。现在，当你说你在复制数据的时候，我还不清楚你是怎么把它转化到R中的，但是听起来好像字节没有被转换成正确的编码。

以您的示例data.frame为例，您可以通过明确说明"Short.Description“字段的编码来”修复“错误(在本例中，这就是触发错误的原因)。试一试

 Encoding(test4$Short.Description) <- "latin1"

然后，如果您再次运行print()，您应该得到类似的内容。

<!-- html table generated in R 3.1.0 by xtable 1.7-3 package -->
<!-- Sun Sep  7 13:33:56 2014 -->
<TABLE border=1>
<TR> <TH> Record.ID </TH> <TH> Record.Type </TH> <TH> Short.Description </TH>
<TH> Record.State </TH> <TH> Owner </TH> <TH> Due.Date </TH>
<TH> days.left </TH>  </TR>
<TR> <TD align="right">  81 </TD> <TD> Type1 </TD>
<TD> specify 2-8°C storage location </TD>
<TD> Work in Progress </TD> <TD> person1 </TD> <TD> 2014-08-14 </TD>
<TD align="right"> -24 </TD> </TR> </TABLE>