在单个图中绘制多个表答案

【问题标题】：Plot multiple tables in a single plot在单个图中绘制多个表
【发布时间】：2012-12-12 13:53:57
【问题描述】：

我有 11 个时间序列，其中包括一个温度列。换句话说，有 11 个表格应该以不同颜色或线型的线条呈现在一个图中。

  t1      t2      t3      t4      t5      t6      t7       t8     t9      t10      t11
 4.14    4.12    4.09    4.07    4.14    4.14    4.12    4.09    4.07    5.70    42.67 
 4.01    3.99    3.97    3.94    4.01    4.01    3.99    3.97    3.94    4.14    39.98 
 3.89    3.86    3.84    3.82    3.89    3.89    3.86    3.84    3.82    4.01    38.73 
 3.77    3.74    3.72    3.69    3.77    3.77    3.74    3.72    3.69    3.89    37.50 
 3.64    3.62    3.59    3.57    3.64    3.64    3.62    3.59    3.57    3.77    36.25 
  3.52   3.50    3.48    3.45    3.52    3.52    3.50    3.48    3.45    3.64    35.07 
  3.40   3.38    3.35    3.33    3.40    3.40    3.38    3.35    3.33    3.52    33.86 
  3.27   3.24    3.22    3.19    3.27    3.27    3.24    3.22    3.19    3.40    32.52 
  3.13   3.10    3.07    3.05    3.13    3.13    3.10    3.07    3.05    3.27    31.11 
  2.99   2.96    2.94    2.91    2.99    2.99    2.96    2.94    2.91    3.13    29.73 
  2.85   2.81    2.78    2.75    2.85    2.85    2.81    2.78    2.75    2.99    28.23 
  2.69   2.66    2.63    2.59    2.69    2.69    2.66    2.63    2.59    2.85    26.69 
  2.53   2.49    2.46    2.42    2.53    2.53    2.49    2.46    2.42    2.69    25.01 
  2.36   2.33    2.29    2.26    2.36    2.36    2.33    2.29    2.26    2.53    23.36 
  2.19   2.16    2.13    2.10    2.19    2.19    2.16    2.13    2.10    2.36    21.74 
  2.05   2.02    1.98    1.95    2.05    2.05    2.02    1.98    1.95    2.19    20.24

【问题讨论】：

你读过?plot, ?lines, ?matplot吗？
@CarlWitthoft，我已经审查了它们。问题是所有表（记录数）的 X 轴应该相同。换句话说，如果我们认为每个表格都有一个情节，我想在一个情节中呈现表格的所有情节。
目前提供的所有答案都是matplot 所做的变体。如果您的第 N 列具有日期值，那么 `matplot(data[,N],data[,-N],type='l') 将准确地为您提供您所要求的。

标签： r plot

【解决方案1】：

一个选项是：

使用熔体重塑数据

ggplot2 绘制熔化数据

 dat$date <- seq(as.Date('2011-01-01'),as.Date('2011-01-31'),
 length.out=dim(dat)[1])
 library(reshape2)
 dat.m <- melt(dat,id='date')
 library(ggplot2)
 qplot(data=subset(dat.m),x= date, y=value,color=variable, geom='line')

我从数据集中删除 t11 变量并重新绘制

     qplot(data=subset(dat.m, variable != 't11'),x= date, y=value,
        color=variable, geom='line')

【讨论】：

我无法理解如何将 11 个单独的表格添加到单个图中。