ggplot2를 사용하여 비늘을 숨길 때 플롯 크기를 유지하는 방법은 무엇입니까?

Question

ggplot2를 사용하여 산점도를 플로팅하고 있습니다. 저울을 숨길 때 자동으로 음모가 나타나기 때문에 조금 큰 것입니다. 예 :

ggplot(data = iris, geom = 'blank', aes(y = Petal.Width, x = Petal.Length)) + geom_point() 

ggplot(data = iris, geom = 'blank', aes(y = Petal.Width, x = Petal.Length)) + 
geom_point() + 
theme(axis.title.x = element_blank(), 
     axis.title.y = element_blank(), 
     legend.position = "none") 

두 번째 크기가 더 큽니다. 어떻게 피할 수 있습니까? 저울과 레이블을 숨기고 싶지만 음표를 첫 번째 음표로 유지하고 싶습니다. 두 개의 음표를 하나의 음표와 하나를 결합하지 않고 하나의 음표를 결합하기를 원하기 때문입니다. 감사.

Answer 1

까다 롭지만 작동합니다.

ggplot(data = iris, geom = 'blank', aes(y = Petal.Width, x = Petal.Length)) + geom_point() 

+ theme (axis.title.x = element_text(family = "sans", face = "bold")) 
ggplot(data = iris, geom = 'blank', aes(y = Petal.Width, x = Petal.Length)) + 
    geom_point() + 
    theme(axis.title.x = element_text(family = "sans", face = "bold",colour='white'))+ 
    theme(axis.title.y = element_text(family = "sans", face = "bold",colour='white')) 

흰색 편집에 축 : 일반적인 솔루션

p1 <- ggplot(data = iris, geom = 'blank', aes(y = Petal.Width, x = Petal.Length)) + geom_point() 

p2 <- ggplot(data = iris, geom = 'blank', aes(y = Petal.Width, x = Petal.Length)) + 
    geom_point() + 
    theme(axis.title.x = element_blank(), 
     axis.title.y = element_blank(), 
     legend.position = "none") 

gA <- ggplot_gtable(ggplot_build(p1)) 
gB <- ggplot_gtable(ggplot_build(p2)) 
gA$widths <- gB$widths 
gA$heights <- gB$heights 

plot(gA) 
plot(gB)