다중 색인 데이터 업데이트

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 축을 가지고 있고, 열 수에서 나는 숫자에 기반한 데이터 그룹을 취할 수 있습니다 (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) 

에 일반화해야