与PAR相邻的直方图和QQPrice在PDF中没有显示

我有这个配对的样本，我用它绑定了

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

---

如果我看“情节”，这是非常好的，它显示了这两个完美地挨在一起。然而，当我想编译成PDF时，它只给出PDF中的直方图？有人能告诉我我做错了什么吗？

原始代码有问题

par（）。您将在两个不同的图形设备上获得两个绘图。如果将它们保存到
.pdf
文件中，它们将显示在同一文件中，但显示在两个不同的页面上

解决方案

# 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)

另外：您可以使用
pdf（）
直接在
.pdf
文件上绘图。请参见
？pdf
。但请记住在打开此文件之前使用
def.off（）
关闭此文件

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

生成的
.pdf
文件将位于当前工作目录中。如果您不知道它在哪里，请在R中执行
getwd（）
。
您是否将pdf的高度和宽度都设置为足够大？首先，对不起，当然我在cbind中包含了我的两个向量。对不起，我以为它可以工作，但没有。无论我现在如何尝试将pdf转换为我的实际pdf，我都不确定如何将其包括在内。
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