I am generating a matrix using
(mat2 = Array[Subscript[a, ##] &, {4, 4}]) // MatrixForm
but would like to force Mathematica to make it symmetric. Thereby I am using
mat2 //. {Subscript[a, 2, 1] -> Subscript[a, 1, 2]}
to replace $a_{21}$ with $a_{12}$. For the other elements, and also for higher order squares, is there an efficient way to automate this somehow?
Thanks so much!