Cắt bỏ khoảng trống ggplot2 quanh ô

Question

Có cách nào để loại bỏ khoảng trắng xung quanh ô ggplot2 khi hình dạng đã được thay đổi bằng cách sử dụng coord_fixed() không? Tôi muốn khoảng trắng phía trên và bên dưới bị cắt đi để chỉ còn lại khu vực vẽ và nhãn trục. Tôi đang render đầu ra cốt truyện trong một tệp đánh dấu R mà không lưu.

p <- ggplot(mtcars, aes(mpg, wt)) + geom_point() 
p + coord_fixed(ratio = 1) 

Đoạn code dưới đây tạo ra cốt truyện sau:

Answer 1

Khi bạn sử dụng:

ggplot(mtcars, aes(mpg, wt)) + 
    geom_point() + 
    coord_fixed(ratio = 1) + 
    ggsave('plot.jpg', width = 6, height = 1.5, dpi = 300) 

Bạn nhận được một âm mưu với khoảng trắng ít:

Một tùy chọn khác có thể là sử dụng thiết bị png hoặc jpeg:

p <- ggplot(mtcars, aes(mpg, wt)) + 
    geom_point() + 
    coord_fixed(ratio = 1) 

jpeg('plot.jpg', width = 600, height = 150) 
p 
dev.off()