如何使用像素矩阵在同一图上定位多个图像

Question

我想说明在使用kaggle数据集的同一图上的100个随机训练示例，您可以在此处找到：https://www.kaggle.com/c/digit-recognizer/data。

我能够绘制一个接一个，但不在同一地块的号码后：

par(mfrow=c(5,5)) 

for(i in sample(2:length(data),100,replace=FALSE)){  
    dat <- matrix(as.numeric(data[i,1:784]/256),ncol=28,nrow=28,byrow=TRUE) 
    image(dat, axes=TRUE,col=grey(seq(0,1,length=256))) 
} 

我想要做什么是这样的：

我不是能够弄清楚如何指定每个像素的位置....

谢谢！

Answer 1

一个快速的解决办法是使用par设置页边距（mar）到0：

par(mfrow=c(5,5), mar=c(0,0,0,0)) 

for(i in sample(2:length(data),100,replace=FALSE)){  
    dat <- matrix(as.numeric(data[i,1:784]/256),ncol=28,nrow=28,byrow=TRUE) 
    image(dat, axes=FALSE,col=grey(seq(0,1,length=256))) 
} 

如果你想在外面的边界，在par设置oma到值> 0。例如。

par(mfrow=c(5,5), mar=c(0,0,0,0), oma=c(2,2,2,2))