grid.arrange mit QICHarts

Question

Ich versuche, mehrere Diagramme von Qicharts anzuordnen. Mit etwas Arbeit habe ich es so grid.arrange würde alles tun, aber es zeigt nur das letzte Element im Gegensatz zu beiden.

library(qicharts) 
library(grid) 
library(gridExtra) 
y <- rnorm(24, 12, 3) 
a <- qic(y,chart="i") 
b <- qic(y,chart="mr") 
grid.arrange(grob(plot(a)),grob(plot(b))) 

Answer 1

qicharts:::plot.qic legt nahe, dass es auf Basis Grafiken beruht, so dass die Zeichnung geschieht unmittelbar auf dem Gerät und die Handlung selbst wird nicht gespeichert. Sie können Basisfunktionen wie par (mfrow) verwenden, um mehrere Diagramme nebeneinander anzuordnen oder diese Basisgrafikobjekte in grob z. mit dem gridGraphics-Paket.

Alternativ kann die Trellis-basierte Funktion tcc könnten ähnliche Ausgabe, produzieren und kann mit grid.arrange verwendet werden,

grid.arrange(tcc(rnorm(24)), tcc(rnorm(24)))