小编Ced*_*ric的帖子

我正在使用rmarkdown生成一个单词(.docx)报告.我想改变toc的标题.这似乎是可能的,pandoc_args因为在doc文件(1)的情况下可以作为yaml头中的选项传递.但我做得不对.有人能提供一个有效的例子吗？

(1)pandoc.args包含在rmarkdown可能的选项中,在pandoc手册中,有一个toc-title选项

---
title: "yaml header"
author: "cedric"
output:  
  word_document:
   toc: true
pandoc_args: toc-title="Table des matières"
---
# One section
# Another

这会产生:

我有这个data.frame对象:

subject <- c("Nantes", "Nantes", "Nantes", "Brest", "Brest", "Rennes")
page <- c(1, 2, 3, 1, 2, 1)
rows <- c(2, 3, 4, 6, 2, 3)
df <- data.frame (subject,page, rows)

这是输出:

subject   page    rows 
Nantes    1       2     
Nantes    2       3     
Nantes    3       4     
Brest     1       6     
Brest     2       2     
Rennes    1       3

南特的主题:第1页第2
页,第3页.每个页面都有不同的行数.对于南特,page1有2行.

我想要的:根据1:nrow序列复制每一行.

例如:我需要将Nantes第1页dpulicate两次

subject   page    rows 
Nantes    1       1     
Nantes    1       2     
Nantes    2       1 
Nantes    2       2
Nantes    2       3
Nantes    3       1
Nantes    3       2 …

如果单元格的值大于80,我需要为单元格着色.例如,给定此数据框称为df:

dput(df)

structure(list(Server = structure(1:2, .Label = c("Server1", 
"Server2"), class = "factor"), CPU = c(79.17, 93), UsedMemPercent = c(16.66, 
18.95)), .Names = c("Server", "CPU", "UsedMemPercent"), row.names = c(NA, 
-2L), class = "data.frame")

df [2,2]应为红色.我能够使用xtable通过类似的方式更改文本的颜色:

df[, 2] = ifelse(df[, 2] > 80, paste("\\color{red}{", round(df[, 2], 2), "}"), round(df[, 2], 2))

如果我这样做并用kable打印出桌子,它就不会打印出来.任何想法如何在kable输出表中为单元格着色？