4

我在 SO 上看到过类似的问题——其中大多数都没有得到回答。那些被回答的人通常建议不要使用 xtable，因为它不灵活定制。我附上了两张图片：1）我从 xtable 生成的表格 2）我的理想表格。我想在我的 1.png 中添加水平线，将其分为 3 个部分，并将部分称为学校、年级、学生。

1）有人看到任何可能的xtable解决方案吗？

2) 有没有办法将 xtable 的输出读取为字符串列表，然后通过添加一些乳胶代码来修改它以获得所需的表？你试过了吗？

3) 有没有其他可以用来代替 xtable 的包？ 在此处输入图像描述 在此处输入图像描述

以下是一些可以使用的模拟数字（假设它是 1.png 的代码）：

library(xtable)

desc.matrix <- matrix(rep(NA,60),ncol = 4)
colnames(desc.matrix) <- c("Grade 3","Grade 4","Grade 5","Total")
rownames(desc.matrix) <- c("TRT-#Schools","TRT(Enroll>=85%)-#Schools", 
"TRT(Prog>=50%)- #Schools", "TRT(Prog >= 50% & Enroll>=85%)-#Schools",
"Control-#Schools","TRT-#Grades","TRT(Enroll>=85%)-#Grades", 
"TRT(Prog>=50%)-#Grades", "TRT(Prog >= 50% & Enroll>=85%)-#Grades",
"CTRL-#Grades","TRT-#Students","TRT(Enroll>=85%)-#Students", 
"TRT(Prog>=50%)-#Students", "TRT(Prog >= 50% & Enroll>=85%)-#Students",
"CTRL-#Students")

for (i in 1:ncol(desc.matrix)){
   desc.matrix[,i] <- c(1:(nrow(desc.matrix)))
}

xtable(desc.matrix)

我感谢您的帮助。

4

1 回答 1

4

搜索 xtableGallery.pdf 并在其中搜索hline.after以查找如何将分隔线放置在您喜欢的任何位置的示例。如果你这样做?xtable了，那么去底部的索引，然后点击顶部关于小插曲的链接，你也可以在那里找到它。

于 2012-08-09T21:52:59.957 回答