Lưu một âm mưu trong một đối tượng

Trong đó ggplot2, người ta có thể dễ dàng lưu một đồ họa vào một đối tượng R.

p = ggplot(...) + geom_point()      # does not display the graph
p                                   # displays the graph

Hàm chuẩn plottạo ra đồ họa dưới dạng hàm void và trả về NULL.

p = plot(1:10)     # displays the graph
p                  # NULL

Có thể lưu một đồ họa được tạo bởi plotmột đối tượng không?

đồ họa cơ sở vẽ trực tiếp trên thiết bị.

Bạn đã có thể sử dụng

1- recordPlot

2- gridGraphicsgói được giới thiệu gần đây , để chuyển đổi đồ họa cơ sở sang dạng lưới tương đương

Đây là một ví dụ tối thiểu,

plot(1:10) 

p <- recordPlot()
plot.new() ## clean up device
p # redraw

## grab the scene as a grid object
library(gridGraphics)
library(grid)
grid.echo()
a <- grid.grab()

## draw it, changes optional
grid.newpage()
a <- editGrob(a, vp=viewport(width=unit(2,"in")), gp=gpar(fontsize=10))
grid.draw(a)

Tôi rất muộn để làm điều này, nhưng đó là câu hỏi đầu tiên xuất hiện khi tôi tìm kiếm câu hỏi. Vì vậy, tôi muốn thêm giải pháp của mình cho những người xem tương lai bắt gặp câu hỏi.

Tôi đã giải quyết điều này bằng cách sử dụng một hàm thay vì một đối tượng. Ví dụ: giả sử chúng ta muốn so sánh hai bản phân phối beta với các tham số khác nhau. Chúng tôi có thể chạy:

z1<-rbeta(10000,5,5)
z2<-rbeta(10000,20,20)
plotit<-function(vector,alpha,beta){
plot(density(vector),xlim=c(0,1))
abline(v=alpha/(alpha+beta),lty="longdash")
}

Và lưu các ô dưới dạng hàm chứ không phải đối tượng.

z.plot1<-function(){plotit(z1,5,5)}
z.plot2<-function(){plotit(z2,20,20)}

Tiếp theo, chúng ta có thể gọi từng ô như chúng ta muốn bằng cách đơn giản gọi hai ô dưới dạng hàm chứ không phải đối tượng.

z.plot1()

vạch ra âm mưu đầu tiên và

z.plot2()

âm mưu thứ hai.

Hy vọng điều đó sẽ giúp những người tình cờ gặp phải điều này sau này!

Bạn có thể sử dụng tính năng ràng buộc hoạt động của pryrgói nếu bạn không muốn trực tiếp thay đổi các giá trị của đối tượng được tạo.

library(pryr)
a %<a-% plot(1:10,1:10)

Mỗi lần bạn gõ atrên bảng điều khiển, biểu đồ sẽ được in lại trên màn hình. Người %<a-%vận hành sẽ chạy lại tập lệnh mỗi lần (trong trường hợp có một biểu đồ, tôi nghĩ đây không phải là vấn đề). Vì vậy, về cơ bản mỗi khi bạn sử dụng a, mã sẽ được chạy lại dẫn đến biểu đồ của bạn, tất nhiên bạn có thể thao tác (chồng một âm mưu khác lên trên) hoặc lưu bằng cách sử dụng pngchẳng hạn. aTuy nhiên, không có giá trị nào được lưu trữ trong đó . Giá trị sẽ vẫn là NULL.

Tôi không biết liệu trên có phải là những gì bạn đang tìm kiếm hay không nhưng nó có thể là một giải pháp chấp nhận được.

library(ggplot2)
# if mygraph is a plot object
ggsave("myplot1.png",mygraph)

# if the plot is in a list (e.g. created by the Bibliometrics package)
ggsave("myplot1.png",mygraphs[[1]])