r - 使用 apply 函数对 r 中的每个数组切片进行成像

Question

我有一个尺寸为 32x32x1000 的数组。我想使用imageandapply函数对该数组的所有切片进行成像。这 1000 张图片将显示为 25x40 的图。但是，我只能可视化第一个切片。

这是我的代码：

par(mfrow = c(25, 40))

data <- array(data = b, dim = c(32,32,2000))

apply(data, c(1,2), FUN = image)

Answer 1

apply沿边距使用3。例子：

op <- par(mfrow=c(2, 2))
apply(A, MARGIN=3L, image)
par(op)

您可能会遇到figure margins too large与“预览”绘图设备有关的问题，因此您可能想尝试其中一种补救措施。还请访问help('par')如何调整其他一些图形参数，例如mar=.

---

数据：

set.seed(42)
A <- replicate(4, matrix(runif(10*10), 10))