Matrix 平均上下三角矩阵

Matematica中是否有一种现有的方法来平均左下角和右上角三角形矩阵中的相应元素

例如，给定以下矩阵：

以Matematica的形式显示如下： {1,2.2,3}，{2.1,1,4}，{2.5,2,1}

我想得到：

以数学的形式，它是：

---

{{1,0,0}，{2.15,1,0}，{2.75,3,1}

我找到了答案。我找不到内置函数，但通过使用转置和加法/除法运算符，我可以轻松地找到如下解决方案：

mata={{1,2.2,3},{2.1,1,4},{2.5,2,1}};
matb=Transpose[mata];
mata=LowerTriangularize[mata];
matb=LowerTriangularize[matb];
avgmat=(mata+matb)/2;
MatrixForm[avgmat]