여백 제거 및 ggplot의 레이블 글꼴 스타일 변경

Question

나는 ggdendro와 ggplot을 사용하여 멍멍 모양을 생성했습니다. 생성 된 플롯과 관련하여 두 가지 문제가 있습니다.

1. 생성 된 플롯에서 약간의 여백을 줄일 수 있습니까?
2. 한 축을 따라 레이블의 글꼴 스타일 (예 : 크기)을 변경하는 방법은 무엇입니까?

플롯에서 "빨간색 창"으로 표시된 두 영역은 제거하려는 여백입니다. x 축을 따라 6 개의 레이블이 노란색으로 표시됩니다. 나는 그들의 크기를 증가시키고 싶다.

코드 :

> x<-read.csv("test1.csv",header=TRUE) 
> d<-as.dist(x,diag=FALSE,upper=FALSE) 
> hc<-hclust(d,"ave") 
> dhc<-as.dendrogram(hc) 
> ddata<-dendro_data(dhc,type="rectangle") 
> ddata$labels$text <- gsub("\\."," ",ddata$labels$text) 
> fig1<-ggplot(segment(ddata))+geom_segment(aes(x=x0,y=y0,xend=x1,yend=y1)) 
> fig1<-fig1+xlab(NULL)+ylab(NULL)+opts(panel.grid.minor=theme_blank()) 
> fig1<-fig1+scale_x_discrete(limits=ddata$labels$text) 
> fig1<-fig1+coord_flip() 
> last_plot() 
> fig1<-last_plot() 
> ggsave("test1.pdf") 

Answer 1

당신이 (opts()을 불렀다이 ggplot2의 이전 버전에서) theme를 사용 (훨씬 더 많은 등) 축 레이블의 크기를 늘리려면 :

를

+ theme(axis.text.x = element_text(size = 12)) 

은 훨씬 더 커집니다. 숫자가 플롯 한계에 대한 첨가제 및 곱셈 확장 요소입니다

+ scale_x_continuous(expand = c(0,0)) 

: 여백을 줄일를 들어, expand 인수를 사용 할 수 있습니다.

더욱 일반적으로 이러한 사항은 모두 here 또는 here과 같은 위치에 문서화되어 있습니다. 또는 해들리의 책을 구입하면 ggplot에 관한 거의 모든 질문에 답할 수 있습니다. (진심으로)