Question

我不确定这是否是正确的问题。

这会产生数据集

criteria <- lapply(graphs, function(graph){
  get_criteria(graph, n_immunize)})

看起来像那样：

$lattice
$lattice$highest_pagerank
  [1] 999 998 997 ...
$lattice$eigenvector_centrality
  [1] 508 509 507 ...
$lattice$betweenness_centrality
  [1] 572 573 571 ...
$lattice$closeness_centrality
  [1] 500 501 502 ...
$lattice$highest_degree
  [1]  82  83  84  ...

$erdos_renyi
$erdos_renyi$highest_pagerank
  [1] 828 242 821 ...
$erdos_renyi$eigenvector_centrality
  [1] 828 821 242 ...
$erdos_renyi$betweenness_centrality
  [1] 828 242 821 ...
$erdos_renyi$closeness_centrality
  [1] 828 242 821 ...
$erdos_renyi$highest_degree
  [1] 828 242 821 ...

每个网络的位置都有整数列表。

我的问题是，我希望在所有网络中选择所有$ highest_pagerank列表，然后在所有网络中选择所有$ eigenvector_centrality列表，依此类推。

达到以下程度：

myData[,1] and myData[,2]

我希望很清楚我想要实现的目标。

提前致谢！：）

Answer 1

像lapply(criteria,"[[","highest_pagerank")之类的东西应该这样做（或使用sapply()将结果简化为矢量）

获取R对象的每个子元素

1 个答案: