# NOT RUN {
mat <- t( matrix( rnorm(4000),ncol=10) )
mask = makeImage( c(20,20), 1 )
plist = matrixToImages( mat, mask )
rplist<-renormalizeProbabilityImages( plist, mask )
rplist2<-renormalizeProbabilityImages( plist, mask , 2 )
# }
Run the code above in your browser using DataLab