如何格式化Sweave LaTeX表输出以使用美元符号($)?

时间:2013-04-16 19:07:48

标签: latex sweave xtable

以下是示例数据:

# create table data
year <- c("2010", "2011", "2012")
value <- ("5", "10", "15")
df<-data.frame(year, value)

# print
print(xtable(df,digits=c(0,0,1)))

如何格式化5,10和15以显示为$ 5.0,$ 10.0和$ 15.0?

可能需要帮助的R套餐包括xtablestargazer和/或Hmisc

xtable内,解决方案可以在format.args中找到:“formatC函数的参数列表。例如,标准德语数字分隔符可以指定为{{1} }“。 - http://cran.r-project.org/web/packages/xtable/xtable.pdf

谢谢

1 个答案:

答案 0 :(得分:2)

在使用df$value函数之前,使用美元格式格式化xtable()更为简单。使用您的示例,您将拥有以下内容(需要scales库):

library(xtable)
library(scales)

# create table data
year <- c("2010", "2011", "2012")
value <- c("5", "10", "15")
df<-data.frame(year, value)

df$value <- dollar(as.numeric(as.character(df$value)))

# print
print(xtable(df))

这会产生以下乳酸代码:

% latex table generated in R 2.12.2 by xtable 1.6-0 package
% Fri May 03 10:46:58 2013
\begin{table}[ht]
\begin{center}
\begin{tabular}{rll}
  \hline
 & year & value \\ 
  \hline
1 & 2010 & \$5.00 \\ 
  2 & 2011 & \$10.00 \\ 
  3 & 2012 & \$15.00 \\ 
   \hline
\end{tabular}
\end{center}
\end{table}