R forceSymmetric-methods 強製矩陣為“對稱矩陣”而不進行對稱性檢查

說明

將方陣 x 強製轉換為 symmetricMatrix ，無需對稱檢查，因為它將應用於 as(x, "symmetricMatrix") 。

用法

forceSymmetric(x, uplo)

參數

x	任何方陣(數字)， “"traditional"” ( matrix ) 或繼承自 Matrix 。
uplo	可選字符串，"U" 或 "L"，指示 x 的 “triangle” 一半應確定結果。默認值為 "U" ，除非 x 已具有 uplo 插槽(即，當它為 symmetricMatrix 或 triangularMatrix 時)，其中默認值為 x@uplo 。

值

繼承自類 symmetricMatrix 的方陣。

例子

 ## Hilbert matrix
 i <- 1:6
 h6 <- 1/outer(i - 1L, i, "+")
 sd <- sqrt(diag(h6))
 hh <- t(h6/sd)/sd # theoretically symmetric
 isSymmetric(hh, tol=0) # FALSE; hence
 try( as(hh, "symmetricMatrix") ) # fails, but this works fine:
 H6 <- forceSymmetric(hh)

 ## result can be pretty surprising:
 (M <- Matrix(1:36, 6))
 forceSymmetric(M) # symmetric, hence very different in lower triangle
 (tm <- tril(M))
 forceSymmetric(tm)

也可以看看

symmpart 用於矩陣的對稱部分，或強製轉換 as(x, <symmetricMatrix class>) 。