Apply a ceiling and floor to all values in a matrix
MinMax(data, min, max)Returns matrix after performing these floor and ceil operations
mat <- matrix(data = rbinom(n = 25, size = 20, prob = 0.2 ), nrow = 5)
mat
#> [,1] [,2] [,3] [,4] [,5]
#> [1,] 7 2 6 1 1
#> [2,] 6 2 2 7 5
#> [3,] 7 5 3 2 4
#> [4,] 7 3 1 2 4
#> [5,] 6 1 5 2 2
MinMax(data = mat, min = 4, max = 5)
#> [,1] [,2] [,3] [,4] [,5]
#> [1,] 5 4 5 4 4
#> [2,] 5 4 4 5 5
#> [3,] 5 5 4 4 4
#> [4,] 5 4 4 4 4
#> [5,] 5 4 5 4 4