R语言中生成对称矩阵

要在R语言中生成对称矩阵，可以按照以下步骤进行操作：

# 生成一个矩阵
mat <- matrix(runif(16), 4, 4)

# 将下三角矩阵变为0
mat[lower.tri(mat)] <- 0

# 将矩阵转置并与原矩阵相加，再减去对角线
symmat <- mat + t(mat) - diag(diag(mat))

# 输出结果
symmat

这段代码首先生成了一个4x4的矩阵mat，然后将其下三角矩阵的元素设置为0。接着，将矩阵转置并与原矩阵相加，再减去对角线，得到了对称矩阵symmat。最后，输出生成的对称矩阵symmat。