如果我有一个想要的 R 的第一个特征值,求解一个矩阵?
Solve for a matrix if I have a desired first eigenvalue with R?
这是我的问题的简化版本。假设我有以下矩阵:
[0 4x
.6 0]
我想求解 x,因为我希望我的第一个(最大)特征值等于 1。在 R 中有解决这个问题的简单方法吗?
尝试
f <- function(x){
m <- matrix(c(0, 4*x, .6, 0), 2, 2, byrow=TRUE)
Re(eigen(m)$values[1]) - 1
}
uniroot(f, c(-1, 1))$root
这是我的问题的简化版本。假设我有以下矩阵:
[0 4x
.6 0]
我想求解 x,因为我希望我的第一个(最大)特征值等于 1。在 R 中有解决这个问题的简单方法吗?
尝试
f <- function(x){
m <- matrix(c(0, 4*x, .6, 0), 2, 2, byrow=TRUE)
Re(eigen(m)$values[1]) - 1
}
uniroot(f, c(-1, 1))$root