Define:
df <- data.frame(name=c("México","Michoacán"),dat=c(1,2))
s.t.
> df
name dat
1 México 1
2 Michoacán 2
当我将此表打印到.tex
文件使用xtable
重音字符会出现乱码,这并不奇怪。
我想用适当的方式替换重音Latex
格式化例如:
> df
name dat
1 M\'{e}xico 1
2 Michoac\'{a}n 2
请注意,在真实数据集中,有许多不同的名称具有不同的重音字母,但都具有相同类型的重音(即正斜杠),因此唯一需要更改的是\'{.}
是代替点的字母。
在尝试一位读者的建议时,我做了以下事情:
> df <- data.frame(name=c("México","Michoacán"),dat=c(1,2))
> df
name dat
1 México 1
2 Michoacán 2
> df$name <- sub("é", "\\\\'{e}", df$name,)
> df
name dat
1 M\\'{e}xico 1
2 Michoacán 2
> capture.output(
+ print(xtable(df)),
+ file = "../paper/rTables.tex", append = FALSE)
当我打开rTables.tex记事本中的文件:
% latex table generated in R 2.13.1 by xtable 1.5-6 package
% Fri Jul 15 13:19:17 2011
\begin{table}[ht]
\begin{center}
\begin{tabular}{rlr}
\hline
& name & dat \\
\hline
1 & M$\backslash$'\{e\}xico & 1.00 \\
2 & Michoacán & 2.00 \\
\hline
\end{tabular}
\end{center}
\end{table}
这不是所需要的。