绘制R中每个列表列表的元素

Question

假设我有一个如下列表。请注意，它们没有索引（因此 Plot Elements from List of Lists in Multiple Colors 不起作用）。我想在一个图中以不同的颜色绘制列表列表的每个元素；所有列表列表中的第一个元素用红色绘制，第二个用蓝色绘制，依此类推。该图将包含三个 x 轴值（每个对应一个列表）和 14 行。我希望这是一个线图而不是点。这只是我的数据示例，每个列表中有更多元素，而且列表更长，所以如果您也能提供自动着色方案，我将不胜感激。

这是我的示例数据：

dput(eig_inter_list)
list(structure(c(0.35292487525346, 0.60691801065057, 1, 0.580488938067023, 
0.309868800437186, 0.803624552294329, 0.859614844376857, 0.945322316985286, 
0.66382386229292, 0.582923451391743, 0.700743501629888, 0.54057650370494, 
0.618018253507612, 0.827733889516536), .Dim = c(14L, 1L)), structure(c(0.277569256062068, 
0.349586859887733, 0.501330486808658, 0.512673497480961, 0.415383940065017, 
0.580991046711227, 0.662789950341437, 0.715112711298967, 0.527336235410471, 
0.307662169519342, 1, 0.569881462583403, 0.770921042348471, 0.601883082654194
), .Dim = c(14L, 1L)), structure(c(0.497890982517205, 0.408808327528174, 
0.458163926773143, 0.647830131597746, 0.497917404040468, 0.884088378425421, 
0.597378982413682, 1, 0.731715482131051, 0.937716641217791, 0.81980698262881, 
0.761533227649694, 0.791174439173143, 0.53885600731611), .Dim = c(14L, 
1L)))

Answer 1

基于structure，它只是matrixces 的list，只有一个列。一个选项是使用Map 循环list 以及要绘制的相应colors 的向量/列表。在打印之前指定par 以将其放在单个页面中

par(mfrow = c(3, 1))
Map(function(x, col) plot(x, type = 'l', color = col), 
     eig_inter_list, c("red", "blue", "green"))

-输出

---

如果我们想在单个图中绘制，cbindmatrixes 在一个具有 3 列的矩阵中并使用matplot

matplot(do.call(cbind, eig_inter_list), type = "l", 
      col = c('red', 'blue', 'green'), lty = 1, ylab = "value")

-输出