'plot'과 'ggplot'이 나란히 생성 된 플롯

Question

plot으로 생성 된 플롯을 한 페이지에 R로 ggplot의 기능을 넣을 수있는 방법이 있습니까?

동일한 기능으로 만든 플롯을 par 또는 multiplot 함수를 사용하여 한 페이지에 넣기는 쉽지만 위의 질문을 이해할 수 없습니다.

Answer 1

gridBase 패키지와 viewPorts를 사용하면이 작업을 수행 할 수 있습니다.

library(grid) 
library(gridBase) 
library(ggplot2) 

# start new page 
plot.new() 

# setup layout 
gl <- grid.layout(nrow=1, ncol=2) 
# grid.show.layout(gl) 

# setup viewports 
vp.1 <- viewport(layout.pos.col=1, layout.pos.row=1) 
vp.2 <- viewport(layout.pos.col=2, layout.pos.row=1) 
# init layout 
pushViewport(viewport(layout=gl)) 
# access the first position 
pushViewport(vp.1) 

# start new base graphics in first viewport 
par(new=TRUE, fig=gridFIG()) 

plot(x = 1:10, y = 10:1) 

# done with the first viewport 
popViewport() 

# move to the next viewport 
pushViewport(vp.2) 

ggplotted <- qplot(x=1:10,y=10:1, 'point') 
# print our ggplot graphics here 
print(ggplotted, newpage = FALSE) 

# done with this viewport 
popViewport(1) 

이 예

는 Dylan Beaudette

Answer 2

예에 의한 this blog post의 수정 된 버전입니다. 그것들은 그리드 기반의 그래픽 시스템과 반환 그래픽 객체입니다. gridExtra 패키지의 grid.arrange 함수를 살펴 보자.