그룹 또는 그룹이 아닌 집합 또는 요소에 따라 격자에서 플롯에 색상 지정하기

Question

4 개의 데이터 세트 (아래의 "구성"에 4 개의 다른 하위 세트)가있는 실험 데이터의 격자 플롯이 있습니다. 각 데이터 세트는 구성 및 요소에 따라 세분화됩니다. 바람 방향에 따라 각 테스트 유형 내에서 그룹화됩니다 ("Dir"). 나는 모든 플롯에 걸쳐 그룹 "Dir"에 따라 포인트의 모양을 설정할 수 있지만 "Config"에 따라 색상을 설정할 수 없습니다. 예를 들어 첫 번째 플롯에 모두 빨간색 점이 있고 두 번째 플롯에는 모두 파란색 점이 있습니다 내가 격자의 xyplot과 줄거리에 대한 코드를 사용하고 등입니다 : 내 담당자가 레 sthan (10), 사과 같이

xyplot(ach[,"F"]~ach[,"Ar_sqrt"] | Config., type=c("p"),ach, groups=Dir, 
    auto.key=list(TRUE, space="bottom", columns=4, padding.text=(8)), 
    Outer=TRUE, allow.multiple=TRUE, as.table=TRUE, scales=list(tick.number=10), 
    grid=TRUE, par.settings=simpleTheme(pch=points$shape, cex=1.75, col=1), 
    abline=list(c(0,0.2013), col=2, type="l"), layout=c(1,4), 
    panel = function(x,y,...) { 
    panel.abline(lm(y~x),col = "black", lwd=1) 
    panel.xyplot(x,y,...) 
    }) 

내가 이미지를 첨부하지 못할. 색상 등을 설정하는 여러 가지 방법이 있지만 그룹화 기능을 사용하는 것 같습니다. 내가 아주 많이 감사 찾을 didnt는

https://www.dropbox.com/sh/ug9kun9rycsb1fw/AABSXuMs9kEWSgeEAcTYhDkxa

중복에 어떤 도움이나 방향 :

데이터 세트가 여기에 있습니다, (나는 시도하고 아무 소용하지만이를 사용하는 PCH 및 COL에 열을 추가 ...

이 가장 현재 플롯되는 패널의 인덱스로, 사용자 정의 패널 함수 호출 안에, 당신에게 액세스를 제공 panel.number()를 사용하여 수행됩니다

Answer 1

.

가 여기 간단한 재현 예 :

library(lattice) 
lattice.options(default.theme = standard.theme(color = FALSE)) 
COLORS = c("blue", "gold", "red", "green", "black", "grey") 

xyplot(mpg ~ disp | carb, data = mtcars, 
     panel = function(x,y,...) { 
      panel.xyplot(x, y, col=COLORS[panel.number()], pch=16, ...) 
     }) 

몇 가지 더 복잡 예를 here 및 here이 제공됩니다.