2017-04-10 47 views
0

我想說明在使用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))) 
} 

我想要做什麼是這樣的:

Plot digits

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

謝謝!

回答

2

一個快速的解決辦法是使用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)) 
+0

謝謝!!!當我把軸= FALSE時,正是我想要的 –

相關問題