googleVis minimiert Text und Tabellen in R Markdown

Question

Ich versuche, einen Bericht mit R markdown, kable und googleVis zu machen. Es funktioniert fast perfekt, die Tabellen und Grafiken werden erstellt. Wenn ich jedoch versuche, Grafiken und Tabellen in den rmarkdown einzufügen, werden die Tabellen und jeder Text, der kein Header ist, minimiert, was sie schwer lesbar macht.

Wenn ich nur Tabellen in die Markdown-Datei setze, haben die Tabellen eine schöne Größe. Ich würde gerne wissen, warum die Tabellen und Texte minimiert werden, wenn Grafiken von googleVis hinzugefügt werden und wie ich das verhindern kann.

Nachstehend ist ein reproduzierbares Code:

```{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 
``` 

Answer 1

ersetzen Pie mit print(Pie, "chart"):

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

print(Pie, "chart) 

dies sollte die Arbeit