利用lua语言编程将矩阵最简化

以下是利用 Lua 语言编写的矩阵最简化代码：

-- 定义一个矩阵最简化函数
function matrix_simplify(matrix)
  local row, col = #matrix, #matrix[1]
  local lead = 1
  
  for r = 1, row do
    if col < lead then
      return
    end
    
    local i = r
    while matrix[i][lead] == 0 do
      i = i + 1
      if row == i then
        i = r
        lead = lead + 1
        if col == lead then
          return
        end
      end
    end
    
    matrix[i], matrix[r] = matrix[r], matrix[i]
    
    local lv = matrix[r][lead]
    for j = 1, col do
      matrix[r][j] = matrix[r][j] / lv
    end
    
    for i = 1, row do
      if i ~= r then
        local lv = matrix[i][lead]
        for j = 1, col do
          matrix[i][j] = matrix[i][j] - lv * matrix[r][j]
        end
      end
    end
    
    lead = lead + 1
  end
end

这个函数接受一个二维数组作为参数，表示一个矩阵，然后通过高斯消元法将矩阵最简化。最后可以将简化后的矩阵输出来验证结果。