powered by
focal.function
centervalue(x)
resid.median
( m <- matrix( round(runif(9,1,10)), ncol=3 ) ) centervalue(m)
Run the code above in your browser using DataLab