【发布时间】：2019-10-02 17:44:16
【问题描述】：
我生成了 1000 个 2x2 随机矩阵：
M=lapply(1:1000, function(z) 矩阵(runif(1000,min=-10,max=10), ncol = 2, nrow = 2)) eig=lapply(M, 特征)
非常感谢您！
【问题讨论】：
标签： r matrix plot eigenvalue
【发布时间】：2019-10-02 17:44:16
【问题描述】：
我们可以使用[[ 从列表中提取“值”，方法是使用sapply 循环list 的元素，这是通过base R
out <- c(sapply(eig, `[[`, "values"))
plot(out)
或者pluck
library(tidyverse)
map(eig, pluck, "values") %>%
unlist
【讨论】：
-
@Ang 我为此发布了解决方案
-
哦，知道了，非常感谢！！您知道如何绘制所有值而不是一次手动输入一个吗？
-
我必须安装所有与 library(tidyverse) 相关的包吗？输入代码时出现错误
-
抱歉问题...教授对此给出了有限的说明：/
-
哦，明白了！非常感谢...我真的很感激。最后一个问题：你知道如何判断每个矩阵系统是稳定节点、不稳定节点、鞍座、不稳定焦点还是中心？喜欢我需要使用的代码
如果你想要一个基本的 R 解决方案，你可以把它变成一个
mats <- matrix(unlist(lapply(e, function(x) lapply(x, unlist)$values)), ncol = 2, byrow = T)
【讨论】：