strip.text etiketlerini ggplot'ta faset ve kenar boşluğu ile değiştirme = TRUE

Question

here numaralı telefonu inceledim ancak yine de bunu anlayamıyorum. Bir ggplot'ta strip.text.x etiketlerini faceting ile nasıl değiştirebilirim? Özellikle marjlarla facet_grid kullanıyorum. Marj için strip.text etiketi "(hepsi)" dir - fakat İngilizce konuşamayan bir ülkede olduğum için, "Total" yazmayı ya da anadilimde benzer bir şey yazmayı tercih ederim.

opts(stip.text.x=c(levels(facetvariabel,"Total")) does not work. 

Herhangi bir fikir?

Örnek (gerçekten bunun için en iyi veri kümesi - ama işe sanırım)

ggplot(cars, aes(x=dist))+geom_bar()+facet_grid(.~speed, margin=T) 

Answer 1

Sen etiketleyici fonksiyonunu vererek faset etiketleri özelleştirebilirsiniz: http ayrıca bkz:

f <- function(x, y) { 
    if (x == "speed") 
    c(y[-length(y)], "Total") 
    else 
    y 
} 

ggplot(cars, aes(x = dist)) + 
    geom_bar() + 
    facet_grid(. ~ speed, margin = TRUE, labeller = f)