Как получить статистику за боксплотом?

Question

Я хочу найти сводную статистику (Мин., Макс., Медиана, Q1 и Q3 за моим блокпостом, а также std.dev, среднее значение, дисперсию. Я удалил выбросы, поэтому сводка (txdata2) не совсем работает.

Я пытался использовать summary_stat () и только функции stat (), но я, вероятно, использую их неправильно.

txplot <- ggplot(data = txdata2,aes(x= inputx,y= inputy,))


txplot +
  geom_jitter(aes(size = ML.S, color = BPR.GRP.A)) +
  geom_boxplot(alpha = 0.6, outlier.colour = "NA") +

  #Nondata Ink
  xlab("BPR Group") +
  ylab("mL's Per Order") +
  ggtitle("Sales Concentrations") +
  facet_grid(FISCAL.YR~.) +
  coord_cartesian(ylim = c(0,250))