R: How to turn a matrix of values into a function

Question

I have a n x m matrix of values. In this toy example, suppose n = m = 3.

mymat <- matrix(c(16, -15, -2, 15, 13, 16, 0, 0, 0.42), nrow