嗨，我试图绘制我的直方图，它一直给我这个消息：

Error in plot.new : figure margins too large

我试了一整晚在谷歌上搜索解决方案，甚至试着做一个pdf，都没用。
当我试着把pdf放进去的时候，它告诉我这个：

Error in pdf"u666.pdf", width = 27, height = 40 : 
  cannot open file 'u666.pdf'

我不知道还能做些什么来绘制直方图。我也试过这些线，但它们不能给予我一个图形

graphics.off()
par("mar")
par(mar=c(1,1,1,1))

这是密码

op <- par(mfrow=c(5,1))
    x10 <- rnorm(10, mean=PN)
    hist(x10, freq=FALSE)
    x1000 <- rnorm(1000, mean=PN)
    hist(x1000, freq=FALSE)
    x1e5 <- rnorm(1e5, mean=PN)
    hist(x1e5, freq=FALSE)
    par(op)
    dev.off()
 
    op <- par(mfrow=c(3,1))
    hist(x1e5+3, freq=FALSE,ylim=c(0,0.4))
    hist(x1e5-10, freq=FALSE,ylim=c(0,0.4))
    hist(x1e5*1.5, freq=FALSE,ylim=c(0,0.4))
    par(op)