2013-10-14 3 views
1

facet_grid에 의해 주어진 (all) 라벨을 스트립 텍스트로 변경하려면 어떻게해야합니까? margins = ...? (all)FOO변경 (모두) facet_grid 스트립 텍스트

+0

http://stackoverflow.com/questions/2893005/how-to-change-strip-text-labels-in-ggplot-with-facet-and- margin-true) 및 [여기] (http://stackoverflow.com/questions/3472980/ggplot-how-to-change-facet-labels)는 도움이되는 해결책입니다. –

+0

이 "(all)"레이블은 하드 코딩 된 것으로 보이며 ggplot2가 아닌'reshape2 :: add_margins'에도 있습니다. github에서 아직 문제가 없다면 문제를 열어 볼 가치가 있습니다. – baptiste

+0

나는 이것이 중복되기 때문에 투표를 끝내 겠지만, 나는 그 제목이 끔찍하며 나에게 타격을주지 않을 것이라고 생각한다. –

답변

4

당신은 facet_grid()labeller 매개 변수를 사용할 수 있다고

ggplot(mtcars, aes(mpg, wt)) + geom_point() + 
    facet_grid(am ~ cyl, margins = "cyl") 

는 어떻게 만들 수 있습니다 여기에

은 예입니다. 변수와 값의 두 인수를 취하는 함수입니다. 당신은 자신을 정의 할 수 있습니다

[여기] (
facet_labels <- function(variable, value) { 
    labels <- as.character(value) 
    labels[labels == '(all)'] <- 'FOO' 
    return (labels) 
} 

ggplot(mtcars, aes(mpg, wt)) + geom_point() + 
    facet_grid(am ~ cyl, margins = "cyl", labeller = facet_labels) 
+0

완벽. 나는 이미 레이블을 바꾸기 위해 이것을 사용하고 있었지만 그것을 모두에게 적용 할 생각은하지 못했습니다. –