如何绘制空图？

Question

我需要做一个空的情节。这是我能想到的最好的办法了。

plot(0, xaxt = 'n', yaxt = 'n', bty = 'n', pch = '', ylab = '', xlab = '')

有更简单的解决方案吗？

PS：完全空的，没有轴等。

Answer 1

怎么样：

plot.new()

Answer 2

我建议有人需要制作空图，以便稍后在其上添加一些图形。因此，

plot(1, type="n", xlab="", ylab="", xlim=c(0, 10), ylim=c(0, 10))

您可以使用指定图形的轴限制。

Answer 3

以下不会在图中绘制任何内容，并且它将保持为空。

plot(NULL, xlim=c(0,1), ylim=c(0,1), ylab="y label", xlab="x lablel")

这将产生：

当您想在 for 循环或类似内容中添加线条或点时，这非常有用。只需记住根据要绘制的数据更改 xlim 和 ylim 值即可。

附注：
这也可用于箱线图、小提琴图和群体图。对于那些记得将 add = TRUE 添加到其绘图函数中，并指定 at = 来指定要在哪个数字上绘制它们（默认为 x 轴，除非您设置了这些函数中的 horz = TRUE

如果您想触发新的绘图，例如当您使用 layout() 时，最好使用 plot.例如，在下面，我们将在第一行的两侧添加空图以添加一些填充：

layout(mat = matrix(c(1,2,2,3,
                      4,4,5,5),
                    nrow = 2,
                    byrow = TRUE))
plot.new()
plot(iris[, 1:2])
plot.new()
plot(iris[, 1:2])
plot(iris[, 1:2])

在此图中，我手动注释了区域以阐明我的意思：

以下是您实际得到的内容：

Answer 4

这比您原来的解决方案稍微简单一些：

plot(0,type='n',axes=FALSE,ann=FALSE)

Answer 5

Adam，按照您上面的评论（“我希望空图作为多图（mfrow）图中的填充物。”），您真正想要的是 mfg 选项

    par(mfg=c(row,column))

- 它控制您想要放置下一个图的位置。例如，要将一个图放在 3x3 多重图的中间，请执行以下操作

    par(mfrow=c(3,3))
    par(mfg=c(2,2))
    plot(rnorm(10))

Answer 6

你需要一个新的绘图窗口，还需要一个坐标系，所以你需要 plot.new() 和 plot.window()，然后你就可以开始添加图形元素：

plot.new( )
plot.window( xlim=c(-5,5), ylim=c(-5,5) )

points( rnorm(100), rnorm(100) )
axis( side=1 )

示例图

Answer 7

您的解决方案有一个 plot.new() 没有的兴趣：在您“绘制”的空图中，您可以使用 text(x = .. ., y = ..., your_text)。

Answer 8

grid.newpage() ## If you're using ggplot

grid() ## If you just want to activate the device.

Answer 9

带有一些已设置位置的文本的空图。

plot(1:10, 1:10,xaxt="n",yaxt="n",bty="n",pch="",ylab="",xlab="", main="", sub="")
mtext("eee", side = 3, line = -0.3, adj = 0.5)
text(5, 10.4, "ddd")
text(5, 7, "ccc")

Answer 10

如果有人正在寻找 ggplot2 解决方案，您可以使用 cowplot 或 patchwork 包

library(ggplot2)

### examples from cowplot vignettes
plot.mpg <- ggplot(mpg, aes(x = cty, y = hwy, colour = factor(cyl))) +
  geom_point(size = 2.5)
plot.diamonds <- ggplot(diamonds, aes(clarity, fill = cut)) + 
  geom_bar() +
  theme(axis.text.x = element_text(angle = 0, vjust = 0.5))

library(cowplot)
### use NULL
plot_grid(plot.mpg, NULL, NULL, plot.diamonds,
  labels = c("A", "B", "C", "D"),
  ncol = 2
)

# Note: if you want to initialize an empty drawing canvas, use ggdraw() 

library(patchwork)
### use plot_spacer()
plot.mpg + plot_spacer() + plot_spacer() + plot.diamonds +
  plot_layout(ncol = 2) +
  plot_annotation(
    title = "Plot title",
    subtitle = "Plot subtitle",
    tag_levels = "A",
    tag_suffix = ")"
  )

^{由 reprex 包于 2019 年 3 月 17 日创建（v0.2.1.9000 ）}

Answer 11

另一个简单的 ggplot2 选项是使用 geom_blank ，如下所示：

library(ggplot2)
ggplot() +
  geom_blank()

< img src="https://i.sstatic.net/UxDqf.png" alt="">

^{创建于 2022 年 8 月 21 日，使用 reprex v2.0.2}

如您所见，该图是空白的。