R语言绘制上三角矩阵三角位置图

以下是使用R语言绘制上三角矩阵的三角位置图的代码和示例输出：

# 创建一个上三角矩阵
mat <- matrix(1:9, nrow = 3, ncol = 3)
mat[lower.tri(mat)] <- NA

# 绘制三角位置图
plot(0, 0, type = 'n', xlab = '', ylab = '', xlim = c(0, ncol(mat)), ylim = c(0, nrow(mat)))
text(1:ncol(mat), nrow(mat):1, as.character(mat), col = 'red', cex = 1.5)

输出：