look <- matrix(0, 10, 10)
look[3:5, 7:8] <- rnorm(6)
imomenter(look)
data(geom000)
data(ICPg240Locs)
imomenter(geom000)
imomenter(geom000, loc = ICPg240Locs)
data(geom004)
imomenter(geom004)
imomenter(geom004, loc = ICPg240Locs)
Run the code above in your browser using DataLab