多索引数据更新

Question

我有这种格式的数据，我将它们加载到数据框中。

number            value   day  
  2                 2       21/3/2010 00:01:00
  2                 3       21/3/2010 00:02:00
  2                 4       21/3/2010 00:03:00
  3                 2       21/3/2010 00:01:00
  3                 3       21/3/2010 00:02:00
  3                 5       21/3/2010 00:03:00
  3                 4       21/3/2010 00:04:00
  4                 4       21/3/2010 00:01:00
  4                 4       21/3/2010 00:02:00
  4                 4       21/3/2010 00:03:00
  4                 4       21/3/2010 00:04:00

 dm <- read.table(text = Lines, header = TRUE)

我尝试基于数字列的数据。 x轴具有日期和y轴列值，并且从列号I可以基于数量获取数据组（3个不同的图）。

Answer 1

编辑：除了x轴标签之外，这里可以找到我想要的内容。应该推广到三个以上的地块

dm <- data.frame(number=c(2,2,2,3,3,3,3,4,4,4,4),
        value=c(2,3,4,2,3,5,4,4,4,4,4),
        day=c("21/3/2010 00:01:00",
              "21/3/2010 00:02:00",
              "21/3/2010 00:03:00",
              "21/3/2010 00:01:00",
              "21/3/2010 00:02:00",
              "21/3/2010 00:03:00",
              "21/3/2010 00:04:00",
              "21/3/2010 00:01:00",
              "21/3/2010 00:02:00",
              "21/3/2010 00:03:00",
              "21/3/2010 00:04:00"), stringsAsFactors=FALSE)
layout(matrix(1:length(unique(dm$number)),nrow=1, ncol=length(unique(dm$number))))
z <- sapply(unique(dm$number), FUN=function(x) 
    plot(dm$value[dm$number==x],as.factor(dm$day[dm$number==x]), ylab="Value", xaxt="n", xlab="Day", main=paste0("Day ",x), type="l") )
rm(z)