如何在 R 上绘制特征值?
How to plot eigenvalues on R?
我生成了 1000 个 2x2 随机矩阵:
M=lapply(1:1000, function(z) matrix(runif(1000,min=-10,max=10), ncol = 2, nrow = 2))
eig=lapply(M, eigen)
非常感谢您!
我们可以使用 [[
从列表中提取 'values',方法是使用 sapply
遍历 list
的元素,这是通过 完成的基础 R
out <- c(sapply(eig, `[[`, "values"))
plot(out)
或 pluck
library(tidyverse)
map(eig, pluck, "values") %>%
unlist
如果你想要一个基本的 R 解决方案,你可以把它变成一个
mats <- matrix(unlist(lapply(e, function(x) lapply(x, unlist)$values)), ncol = 2, byrow = T)
我生成了 1000 个 2x2 随机矩阵:
M=lapply(1:1000, function(z) matrix(runif(1000,min=-10,max=10), ncol = 2, nrow = 2)) eig=lapply(M, eigen)
非常感谢您!
我们可以使用 [[
从列表中提取 'values',方法是使用 sapply
遍历 list
的元素,这是通过 完成的基础 R
out <- c(sapply(eig, `[[`, "values"))
plot(out)
或 pluck
library(tidyverse)
map(eig, pluck, "values") %>%
unlist
如果你想要一个基本的 R 解决方案,你可以把它变成一个
mats <- matrix(unlist(lapply(e, function(x) lapply(x, unlist)$values)), ncol = 2, byrow = T)