Как перевернуть ось X и сделать заголовки жирными?

Question

Я пытаюсь создать график, аналогичный показанному ниже, но с переворотом оси X, чтобы он шел от 100 до -40. Я также хотел бы сделать текст жирным шрифтом.

Это мой код:

plot(allEffects(rabbit.model), ylab='Percentage of Rabbits Disturbed', xlab='Time Until Sunset (minutes)', main='')

А это модель (не уверена, нужна ли она вам):

rabbit.model<-glm(cbind(nb_distur, nb_non.distur) ~ Power * (scale(Time)), data=rdata[rdata$Power != "0",], family=binomial)

Graph

Любая помощь приветствуется, спасибо.

Answer 1

Вы переворачиваете ось X, если для параметра xlim сначала установлено более высокое значение, а затем более низкое значение. Я не уверен, какой текст нужно выделять жирным шрифтом, но вы можете использовать par для выделения меток осей, заголовков осей и основного заголовка следующим образом:

par(font.axis = 2, font.lab = 2, font.main = 2)
plot(allEffects(rabbit.model), 
     ylab = 'Percentage of Rabbits Disturbed', 
     xlab = 'Time Until Sunset (minutes)', 
     main = '',
     xlim = c(100,-40)