Удаление поля и изменение стиля шрифта для меток в ggplot

Я создал дендрограмму, используя ggdendro и ggplot. У меня есть две проблемы относительно созданного сюжета.

  1. Можно ли сократить отступ на сгенерированном графике?
  2. Как изменить стиль шрифта, например размер, для метки вдоль одной оси?

На графике две области, отмеченные красным pane "- поля, которые я хотел бы удалить. Шесть меток по оси x отмечены желтым цветом. Хотелось бы увеличить их размер.

enter image description here

Код:

> 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")
6
задан Andrie 9 December 2011 в 06:39
поделиться