У меня есть ggplot, который отображает значение в нижних скобках, но мой босс хочет, чтобы у них были метки вверх и вниз (см. Изображение ниже).Мой босс также хочет, чтобы "нс" были столицей.Есть хороший способ контролировать это без необходимости вручную?Я делаю всего 10 участков.
p <- ggplot(LessCountS, aes(x=Type, y=DC)) +
geom_dotplot(aes(fill= Type), binwidth = 4.5,
binaxis = "y",
stackdir = "center",
color = "black"
) +
theme_gray ()+
labs(x="", y = "Cell Count (cells/uL")+
ggtitle("Dendritic cells") +
scale_x_discrete(labels=c("HC" = "Controls", "IN" = "Inpatients",
"OUT" = "Outpatients")) +
theme(plot.title = element_text(hjust = 0.5, size = 14), legend.text=element_text(size=12),
legend.position = "none", text = element_text(family = "Calibri"), axis.text = element_text(size=14),
axis.title = element_text(size = 14)) +
#scale_fill_brewer(palette="Purples") +
scale_fill_manual(values=c("#CCCCCC", "#990066", "#3366CC")) +
stat_summary(fun.y = median, fun.ymin = median, fun.ymax = median,
geom = "crossbar", width = 0.35) +
stat_compare_means(comparisons = my_comparisons, label.y = , label = "p.signif", size = 5)
p
Мне бы хотелось, чтобы график выглядел так: 
Обратите внимание на разницу в значении, я хочу, чтобы дендритный график выглядел как нейтрофильный график.
Заранее спасибо, S