用R语言创建 5 维方阵赋值给 A，对角线元素为 0，上三角元素全为 1，下三角元素全为 2；

可以使用以下代码创建要求的 5 维方阵 A：

A <- matrix(0, nrow=5, ncol=5) # 创建一个 5*5 的全零矩阵
A[upper.tri(A)] <- 1 # 将上三角元素赋值为 1
A[lower.tri(A)] <- 2 # 将下三角元素赋值为 2
diag(A) <- 0 # 将对角线元素赋值为 0

这里使用了 R 语言内置的 `matrix()` 函数创建初始的全零矩阵，然后使用逻辑索引 `upper.tri()` 和 `lower.tri()` 分别选取上三角和下三角位置的元素，并将它们赋值为 1 和 2。最后使用 `diag()` 函数将对角线元素赋值为 0。