在矩阵中将lm（）应用于R中的1个变量

I am trying to use the apply() family of functions to regress each column of a matrix on a vector to generate a set of coefficients for each column, but I can't wrap my head around it. For example, I can do this with a loop as follows:I am trying to use the apply() family of functi