Я нашел это, Как разместить метки на geom_bar в R с помощью ggplot2 , но он просто помещал метки (числа) только на одну полосу.
Вот, скажем, две полосы для каждой оси x, как сделать то же самое?
Мои данные и код выглядят так:
dat <- read.table(text = "sample Types Number
sample1 A 3641
sample2 A 3119
sample1 B 15815
sample2 B 12334
sample1 C 2706
sample2 C 3147", header=TRUE)
library(ggplot2)
bar <- ggplot(data=dat, aes(x=Types, y=Number, fill=sample)) +
geom_bar(position = 'dodge') + geom_text(aes(label=Number))
Тогда мы получим:
Кажется, что числовые тексты тоже расположены по шаблону «уклонение». Я искал руководство по geom_text, чтобы найти некоторую информацию, но не могу заставить его работать.
Предложения?
vjust = -0.5
послеposition()
оператора, чтобы значения располагались прямо над полосами.ymax
, поэтомуaes(x=Types, y=Number, fill=sample, ymax = 16000)
будет более широкая верхняя область для оси Y, так что 15815 будет лучше отображаться.geom_text(..., angle=-90)
Чтобы добавить к ответу rcs, если вы хотите использовать position_dodge () с geom_bar (), когда x является датой POSIX.ct, вы должны умножить ширину на 86400, например,
источник