격자 밀도 플롯의 패널에 중앙 수직선을 추가하는 방법은 무엇입니까?

Question

긴 형식의 데이터 프레임을 사용하여 lattice에 패널 밀도 플롯을 만듭니다. 이제 각 패널 내 x 값 중앙값에 수직선을 추가하고 싶습니다. 내가 dotplot (http://r.789695.n4.nabble.com/how-to-add-a-vertical-line-for-each-panel-in-a-lattice-dotplot-with-log-scale-td4632513.html)에서 그것을위한 제안을 발견했지만, 이것은 나를 위해 작동하지 않습니다. 여기 내 코드는 다음과 같습니다.

data(Chem97, package="mlmRev") 

densityplot(~gcsescore | factor(score), data=Chem97, 
     panel=function(...){ 
      panel.densityplot(...) 
      median.values <- median(x) 
      panel.abline(v=median.values, col.line="red") 
     }) 

오류는 Object x not found입니다. 그래서 나는 다음과 같은 시도 :

panel=function(x,...){ 
      panel.densityplot(...) 
     } 

순간 내가 패널 함수에 인수로 x을 추가, 나는 오류 Error using packet 1 (2, 3 etc.). x is missing를 얻을.

무슨 일입니까?

densityplot(~gcsescore | factor(score), data=Chem97, 
    panel=function(x,...){ 
     panel.densityplot(x,...) 
     panel.abline(v=quantile(x,.5), col.line="red") 
    }) 

: 나는 마침내 해결책을 발견했습니다

Answer 1