r - 多索引数据更新

Question

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

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 轴有列值，从列号我可以根据数字获取数据组（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)