Как наносить метки на групповые боксы

Question

У меня есть блокпост, разделенный по категориям, мне нужно изобразить значения первого квартиля, медианы, третьего квартиля во всех боксплотах, но я не могу. У меня есть следующий код:

  a <- runif(10,1,100)
  b <-c("A","A","A","A","A","B","B","B","B","B")
  t <- cbind(a,b)     

  bp<- boxplot(a~b)   

Я могу получить значения с помощью команды bp$stats, но я не могу построить каждый блокпост (три фактора / три блокпоста), кто-нибудь может мне помочь?

Answer 1

Если я правильно понимаю, вы хотели бы нанести значения на коробочные диаграммы. Это может быть достигнуто с помощью функции text:

bp <- boxplot(a~b)   
text(x = 1, y = bp$stats[,1] + 2, labels = round(bp$stats[,1], 2))
text(x = 2, y = bp$stats[,2] + 2, labels = round(bp$stats[,2], 2))

с использованием bp$stats значения в качестве координат и подталкивают их к вершине, добавляя 2, чтобы они не перекрывались с графикой. В качестве меток должны использоваться те же значения.

Вы упомянули три вопроса в вопросе, это ошибка или я не понял?