Question

我正在尝试使用xtable包来复选框来编写此表。似乎我选择的复选框是抛出错误的内容。我只是不知道如何解决它。

library(xtable)

## I want to create a table with the names of some people in two columns
nStu = 10

## Create fake names
names = character(nStu)
for(i in 1:nStu){
  names[i] = paste(LETTERS[i],rep(letters[i],5),sep='',collapse='')
}
## put check boxes behind each of the names
squares = rep('$ \\square $',nStu)

## Build the table
rosterTab = data.frame('Name'=names,'Mostly'=squares,'Sometimes'=squares, stringsAsFactors = FALSE)

## Now chop it in half and paste the halves together.  (Yes, if nStu is odd, this will have to be fixed)
lTab = nStu%/%2
aTab = rosterTab[1:lTab, ]
bTab = rosterTab[(lTab+1):nStu, ]
outTab = cbind(aTab,bTab)

## Everything before this point runs fine.
outTab.tab = xtable(outTab,label=FALSE)
align(outTab.tab) = 'llcc||lcc'
print(outTab.tab, include.rownames=FALSE, sanitize.text.function = function(x){x})

我收到的错误消息是：

as.string（y）中的错误：无法将参数强制转换为字符串

如果我使用：

，则此错误消失

squares = rep('aaa',nStu)

理想情况下，我想从csv文件中获取名称（我可以很容易地做到），并使用knitr将其写入LaTeX文档。（我想为一堆输入文件执行此操作，因此自动执行此任务对我来说似乎很有用。）

以下是我考虑过的其他一些想法：

仅限$ \ LaTeX $解决方案。请注意，还有一个难点（除了正方形不在输入文件中），这就是我需要对输入文件中的字符串进行一些文本操作。
将\square符号替换为一个看起来像复选框的其他对象，（通过knitr）我可以发送到$ \ LaTeX $。

xtable与表中的乳胶数学符号

0 个答案: