Displaying 1 result from an estimated 1 matches for "louvre".
Did you mean:
ouvre
2006 Sep 07
0
plot image matrix with row/col labels
...d mean of pixel values
mat <- matrix(nrow=20,ncol=40,0)
for (i in 1:20) {
for (j in 1:40) {
rows <- seq(1+(i-1)*ht, i*ht)
cols <- seq(1+(j-1)*wd, j*wd)
blob <- img2[ rows, cols ]
mat[i,j] <- mean(blob, trim=0.1)
}
}
# names for arrrondisements
rnames <- c(
"01 Louvre", "02 Bourse", "03 Temple", "04 Hotel de Ville", "05 Pantheon",
"06 Luxembourg", "07 Palais", "08 Eglise", "09 Opera", "10 St. Laurent",
"11 Popincourt", "12 Reuilly", "13 Goebl...