rmarkdown word文書のHTML形式の表

Question

データの値を比較し、週ごとの傾向を表示する必要があります。先週からの価値が上がったかどうかを示したい。私はそれを行うためのrmarkdownレポートを作成しました。 output: html_documentが、出力が台無しにされたとき、どのように私はHTMLバージョンに類似文書のWordのバージョンをフォーマットすることができoutput: word_document

--- 
title: "trials" 
author: "Foo Bar" 
date: "15 December 2016" 
output: word_document 
--- 

```{r setup, include=FALSE} 
knitr::opts_chunk$set(echo = TRUE) 
``` 

```{r cars, echo=FALSE, cache=FALSE, message=FALSE} 

library(dplyr, quietly = TRUE) 
library(abind, quietly = TRUE) 
virginica <- iris %>% filter(Species == "virginica") %>% head() %>% select(-Species) 
setosa <- iris %>% filter(Species == "setosa") %>% head() %>% select(-Species) 

diff_mat <- virginica - setosa 


diff_mat[diff_mat<0] <- '<font color="green">&dArr; </font>' 
diff_mat[diff_mat>0] <- '<font color="red">&uArr; </font>' 
diff_mat[diff_mat == 0] <- '<font color="blue">&hArr; </font>' 

datArray <- abind::abind(virginica, diff_mat, along=3) 

fin_dat <- apply(datArray,1:2, function(x)paste(x[1],x[2], sep = " ")) 

knitr::kable(fin_dat, format = "html", 
     escape = FALSE, table.attr = "border=1", 
     caption = "Changes across species") 

``` 

を使用するときに完璧に動作を以下に示しているサンプルコード、？

Answer 1

レンダリング（ "my_document.rmd"、 "Grmd :: docx_document"）。これは、htmlテーブルではうまく動作しますが、スタイルテンプレートを使用するのとは異なります。これは、列のスパナを含むテーブル構造を保持します。