geom_blank giảm NA

Question

Sử dụng geom_blank Tôi muốn thêm một số mức nhân tố mới, nhưng tôi dường như không thể làm được điều này và giữ NA mức

library('ggplot2') 
pl <- ggplot(data.frame(x = factor(c(1:2, NA)), y = 1), aes(x, y)) + geom_point() 
pl 

pl + geom_blank(data = data.frame(x = addNA(factor(c(0:3, NA))), y = 1)) 

Tôi muốn có x ở 0,1,2,3, NA bằng cách sử dụng geom_blank

Answer 1

Như tôi đã hy vọng trong các nhận xét, một công việc xung quanh có thể sắp xếp lại các lớp nếu cốt truyện đã được tạo ra và điều này sẽ làm việc cho các ggplots nói chung.

library('ggplot2') 
pl <- ggplot(data.frame(x = factor(c(1:2, NA)), y = 1), aes(x, y)) + 
    geom_point() + 
    geom_blank(data = data.frame(x = addNA(factor(c(0:3, NA))), y = 1)) 


## not what I want 
pl 


## this is what I want 
pl$layers <- rev(pl$layers) 
pl 

Answer 2

Thật không may, khi bạn có nhiều lớp với bộ dữ liệu riêng biệt, nồng độ yếu tố có thể được điều sai lầm ghi đè. Bạn có thể khắc phục điều này bằng cách đặt các giới hạn trên thang đo rời rạc:

pl <- ggplot(data.frame(x = factor(c(1:2, NA)), y = 1), aes(x, y)) + geom_point()  
pl + 
    geom_blank(data = data.frame(x = addNA(factor(c(0:3, NA))), y = 1)) + 
    scale_x_discrete(limits=addNA(factor(c(0:3, NA)))) 

Vì lý do nào đó, điều này làm hỏng việc mở rộng trục và ngắt NA ở cạnh phải.

[

Điều này có thể được sửa chữa bằng cách tự thiết lập các thông số mở rộng theo ý thích của bạn.

pl <- ggplot(data.frame(x = factor(c(1:2, NA)), y = 1), aes(x, y)) + geom_point() 
pl + 
    geom_blank(data = data.frame(x = addNA(factor(c(0:3, NA))), y = 1)) + 
    scale_x_discrete(limits=addNA(factor(c(0:3, NA))), expand=c(0.25,0.25))