googleVis 最小化 R markdown 中的文本和表格答案

【问题标题】：googleVis minimizes text and tables in R markdowngoogleVis 最小化 R markdown 中的文本和表格
【发布时间】：2017-02-24 15:26:37
【问题描述】：

我正在尝试使用 R markdown、kable 和 googleVis 进行报告。它几乎可以正常工作，生成表格和图表。但是，如果我尝试将图形和表格放在 rmarkdown 中，表格和任何不是标题的文本都会被最小化，使它们难以阅读。

如果我只将表格放在降价文件中，表格的大小会很好。我想知道为什么添加来自 googleVis 的图表时表格和文本会最小化，以及如何防止这种情况发生。

以下是可复现的代码：

```{r results='asis'}
   values1 <- c(36, 9, 21, 16)
   values2 <- c(5, 5, 0 ,6)
   variables <- c("Total", "Var1", "Var2", "Var3")

   table <- data.frame(variables, values1, values2)
   kable(table, caption = "example table")
```

```{r results='asis'}
  values3 <- c(1, 3, 0, 9)
 values4 <- c(4, 6, 3 ,2)
 pievariables <- c("ISV", "TAO", "PRR", "AV")

 piechart <- data.frame(pievariables, values3, values4)

 Pie <- gvisPieChart(piechart[,1:2], options=list(title='example pie',
                                                      width = 400, 
                                                      height = 400,
                                                      pieSliceText='label'))
 Pie
```

【问题讨论】：

标签： r r-markdown minimize googlevis

【解决方案1】：

将Pie 替换为print(Pie, "chart")：

Pie <- gvisPieChart(piechart[,1:2], options=list(title='example pie',
                                                 width = 400, 
                                                 height = 400,
                                                 pieSliceText='label'))

print(Pie, "chart)

这应该做的工作

【讨论】：

非常感谢，确实解决了问题。你能否解释一下为什么如果你指定“图表”它会起作用，而如果你只写“饼图”就不起作用，所以我知道它为什么会发生？
不客气。问题是，如果您将“图表”添加到打印函数中，那么只会写入 HTML 对象的图表组件，否则您会加载 HTML 的所有内容（页眉、图表、标题和页脚），这实际上会导致 knitr 出现问题.但是，或者您也可以使用 gvisTables 来制作比 kable 更多的精美表格。在您的情况下： print(gvisTable(table), "chart") 希望这会有所帮助。
感谢您的澄清。我现在看到，使用页眉和页脚为图表创建了一个新的 html 页面（和）。那会有点麻烦。再次，非常感谢。