R语言 返回一个上三角为TRUE值的矩阵 – upper.tri() 函数

R语言中的 upper.tri() 函数用于返回一个以上三角为TRUE的逻辑值矩阵。

语法： upper.tri(x, diag)

参数：

x： 矩阵对象

diag： 包含对角线的布尔值

例1 :

# R program to print the 
# upper triangle of a matrix
  
# Creating a matrix
mat <- matrix(c(1:9), 3, 3, byrow = T)
  
# Calling upper.tri() Function
# Excluding diagonal elements
upper.tri(mat, diag = F)

输出

      [, 1]  [, 2]  [, 3]
[1, ] FALSE  TRUE  TRUE
[2, ] FALSE FALSE  TRUE
[3, ] FALSE FALSE FALSE

例2 :

# R program to print the 
# upper triangle of a matrix
  
# Creating a matrix
mat <- matrix(c(1:9), 3, 3, byrow = T)
  
# Calling upper.tri() Function
# including diagonal elements
upper.tri(mat, diag = T)

输出

      [, 1]  [, 2] [, 3]
[1, ]  TRUE  TRUE TRUE
[2, ] FALSE  TRUE TRUE
[3, ] FALSE FALSE TRUE