ggplot2: thay đổi vị trí strip.text trong facet_grid cốt truyện

Question

bạn có thể thiết lập vị trí của các huyền thoại trong khu vực âm mưu, như

... + theme(legend.justification=c(1,0), legend.position=c(1,0)) 

Có một cách dễ dàng tương tự để thay đổi vị trí của văn bản dải (hoặc mức độ yếu tố trong âm mưu nhóm)

library(reshape2); library(ggplot2) 

sp <- ggplot(tips, aes(x=total_bill, y=tip/total_bill)) + geom_point() + 
    facet_grid(. ~ sex) 

sp 

(http://www.cookbook-r.com/Graphs/Facets_%28ggplot2%29/)

trong mạng Tôi sẽ sử dụng một cái gì đó như strip.text = levels (dat $ Y) [panel.number()] và panel.text (...), nhưng cũng có thể có cách dọn dẹp hơn ...

thx, Christof

Answer 1

Dưới đây là một cách tiếp cận:

ggplot(tips, aes(x = total_bill, y = tip/total_bill)) + 
    geom_point() + 
    facet_grid(. ~ sex) + 
    geom_text(aes(label = sex), x = Inf, y = Inf, hjust = 1.5, vjust = 1.5) + 
    theme(strip.background = element_blank(), 
     strip.text = element_blank()) 

Tuy nhiên, đây không phải di chuyển strip.text, thay vào đó, thêm một yếu tố geom_text và tắt strip.background và strip.text, nhưng tôi nghĩ nó achiev es kết quả mong muốn.