Обратная ось Y в блокпосте в R

Question

Я прочитал связанные темы, но я все еще не мог понять это. Я сделал коробочный график, используя следующие данные. Как повернуть ось Y так, чтобы 12 отображалось вверху, а 19 - внизу оси y?

 X <- (13,13,13,12,14,14,14,13,16,16,13,15,15,15,14,14,13,16,15,19,15,16,17,14,19,16,18,17,17,18,17,17,19,17,17)

Я использовал boxplot(X,at=rev(1:nlevels(X))), что показывает эту ошибку: 'at' must have same length as 'z$n', i.e. 1

Любой комментарий был бы великолепен!

Answer 1

Попробуйте использовать ylim:

X <- c(13,13,13,12,14,14,14,13,16,16,13,15,15,15,14,14,13,16,15,19,15,16,17,14,19,16,18,17,17,18,17,17,19,17,17)
boxplot(X, ylim = c(19, 12))

Производит:

---

Добавлено после комментария о переключенииОсь Y направо

Код, необходимый для этого:

boxplot(X, ylim = c(19, 12), axes=FALSE)
axis(4, pos = 1.3)

Производит:

Answer 2

Или попробуйте обратный путь:

library(tidyverse)
tibble(X = c(13,13,13,12,14,14,14,13,16,16,13,15,15,15,14,14,13,16,15,19,15,16,17,14,19,16,18,17,17,18,17,17,19,17,17)) %>% 
  ggplot(aes(x = '', y = X)) +
  geom_boxplot() +
  theme_minimal() +
  scale_y_reverse() +
  xlab('')