powered by
matimage(Mat, main = NULL)
set.seed(123) p <- 50 n <- 50 phi <- 0.4 true <- varband_gen(p = p, block = 5) matimage(true)
Run the code above in your browser using DataLab