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

116
9

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


    Возможно ли разрезать некоторый запас от сгенерированного графика?
    Как изменить стиль шрифта, например, размер, для метки вдоль одной оси?

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


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")

спросил(а) 2021-01-25T20:29:09+03:00 4 месяца, 2 недели назад
1
Решение
117

Чтобы увеличить размер меток оси (и многое, многое другое), вы используете theme (в более старых версиях ggplot2 это называлось opts()):


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

сделает их намного больше. Для уменьшения полей вы можете использовать аргумент expand:

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

где числа - аддитивные и мультипликативные коэффициенты расширения для границ графика.


В более общем плане, все это хорошо документировано в таких местах, как здесь или . Или вы могли бы просто купить книгу Хэдли, которая ответит почти на каждый вопрос ggplot, который у вас будет. (Серьезно.)

ответил(а) 2021-01-25T20:29:09+03:00 4 месяца, 2 недели назад
Ваш ответ
Введите минимум 50 символов
Чтобы , пожалуйста,
Выберите тему жалобы:

Другая проблема