내 데이터 세트에서 조건부로 그룹화 된 히스토그램

Question

내 현재 데이터 세트 data.df 3 명의 강사 중 한 명에 따라 8 가지 질문을 한 약 420 명의 학생들이 나왔습니다. escore 내 결과 변수입니다.

    'data.frame':   426 obs. of  10 variables:
     $ ques01: int  1 1 1 1 1 1 0 0 0 1 ...
     $ ques02: int  0 0 1 1 1 1 1 1 1 1 ...
     $ ques03: int  0 0 1 1 0 0 1 1 0 1 ...
     $ ques04: int  1 0 1 1 1 1 1 1 1 1 ...
     $ ques05: int  0 0 0 0 1 0 0 0 0 0 ...
     $ ques06: int  1 0 1 1 0 1 1 1 1 1 ...
     $ ques07: int  0 0 1 1 0 1 1 0 0 1 ...
     $ ques08: int  0 0 1 1 1 0 1 1 0 1 ...
     $ inst  : Factor w/ 3 levels "1","2","3": 1 1 1 1 1 1 1 1 1 1 ...
     $ escore: int  3 1 5 5 3 3 4 4 2 5 ...
     

어떻게 생성 할 수 있는지 궁금합니다 escore 값에 따라 조건부로 분리 된 히스토그램 inst 주어진 관찰. 내 머릿속에서 의사 코드는 다음과 같이 보일 수 있습니다.

    par(mfrow=c(1,3)) 
    hist(escore, data.df$inst = 1)
    hist(escore, data.df$inst = 2)
    hist(escore, data.df$inst = 3)

그러나 물론 작동하지 않을 것입니다 :-(

이상적으로는 내 히스토그램이 다음과 같습니다.

각각 ~ 140 관측치의 3 개의 별도 히스토그램, "Inst"value http://terpconnect.umd.edu/~briandk/escorehistogramsbyinstructor-1.png에 따라 그룹화되었습니다.

평소와 같이, 나는 이것을하기 쉬운 방법이 있어야한다는 것을 느낍니다. "조건부/그룹화"감각이 무엇이든 내 데이터 에서이 그래프를 추출 할 수 있습니다. 갖다 특정 조건에 따라 만들고 싶은 모든 종류의 플롯에 대해 일반화 할 수 있습니다.

또한,이 질문이 전에 답변된다면 정말 죄송합니다. 나의 주요 어려움은 의미가있는 방식으로 그것을 묻는 방법을 알아내는 것입니다.

도와 주셔서 미리 감사드립니다!

Answer 1

격자 패키지 사용 :

library(lattice)
histogram( ~ escore | inst, data=X)

만약에 X 데이터 객체입니다.

Answer 2

ggplot2에서도 이것을 할 수 있습니다.

data.df <- data.frame(inst = factor(sample(3, 426, replace=TRUE)), 
                      escore = sample(5, 426, replace=TRUE))
qplot(escore, fill=inst, data=data.df) + facet_wrap(~inst, ncol=3)

대체 텍스트 http://www.cs.princeton.edu/~jcone/hists.png