通过添加水平线和合并单元格来自定义xtables？

Question

我在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)

感谢您的帮助。

Answer 1

搜索xtableGallery.pdf并在其中搜索hline.after以查找如何将分隔线放在任何您喜欢的位置的示例。如果您执行?xtable，请转到底部的索引，然后按照顶部的链接关注您可以在那里找到的晕影。