Histogramm und qqplot als nächstes mit Par zueinander - nicht zeigen in PDF

Question

Ich habe diese gepaart Probe, die ich mit

gebunden

paired <- cbind(c(before, after)) 

Dann baute ich ein Histogramm und ein QQ-Plot mit

hist(paired, freq=FALSE, ylim=range(0,0.7,by=0.2)) 
curve(dnorm(x, mean=mean(paired), sd=sd(paired)), add=TRUE) 
qqnorm(paired) 
qqline(paired) 
par(mfrow = c(1,2)) 

Wenn ich mir "Plots" anschaue, ist das vollkommen in Ordnung und es zeigt diese beiden perfekt nebeneinander. Wenn ich jedoch in PDF kompilieren möchte, gibt es mir nur das Histogramm in der PDF? Kann mir bitte jemand sagen, was ich falsch gemacht habe?

Answer 1

Problem mit Ihrem ursprünglichen Code

par() spielt keine Wirkung wie Sie es nennen, wenn alle Parzellen gemacht worden. Sie erhalten zwei Diagramme auf zwei verschiedenen Grafikgeräten. Wenn Sie sie in einer .pdf Datei speichern, werden sie in derselben Datei, aber auf zwei verschiedenen Seiten angezeigt.

Lösung

# You should put `par(mfrow = c(1,2))` **before** plotting; 
par(mfrow = c(1,2)) ## split the plotting region in to 1 row 2 columns 
hist(paired, freq=FALSE, ylim=range(0,0.7,by=0.2)) 
curve(dnorm(x, mean=mean(paired), sd=sd(paired)), add=TRUE) 
qqnorm(paired) 
qqline(paired) 

Und: Sie pdf() direkt auf eine Datei .pdf verwenden können, zu zeichnen. Siehe ?pdf. Aber denken Sie daran, diese Datei vor dem Öffnen zu schließen, indem Sie def.off() verwenden.

pdf("test.pdf", height = 6, width = 6) ## open a graphical device, in this case, a .pdf file 
## code above for producing plot 
dev.off() ## close active graphical device, in this case, you .pdf file 

Die resultierende .pdf Datei in Ihrem aktuellen Arbeitsverzeichnis sein. Wenn Sie nicht wissen, wo es ist, tun Sie getwd() in R.