как добавить метки оси x ggplot2 r

Question

Я хотел бы поместить некоторые ярлыки на график Xg оси графика ggplot.

данные:

var.A <- as.numeric(c(1:13)) 
var.B <- c(4.351833, 2.938000, 4.726465, 3.747162, 3.720737, 4.297117, 4.304500, 4.061277, 4.595236, 4.105444, 3.701684, 3.523563, 4.170000) 
df <- data.frame(var.A,var.B) 

ggplot код:

ggplot(df, aes(x=var.A, y=var.B)) + 
    geom_bar(position=position_dodge(), stat="identity", fill="#fff68f", colour="darkgrey", width = 0.4) + 
    coord_flip()+ 
    xlab("") + 
    ylab("") + 
    scale_x_discrete(labels=c("aaaaaaa aaaaa","bbbbb bbb bbbb","cccc ccc","dddd dd ddddd","eee e eeeee e ee","ffffffff","gggggggg","hhhhhhh","iiii","jjjjjj","kkkkkkk","llllll","mmmmmmmm")) 

Я имею в виду документы: ggplot documentation

Как заставить R поставить эти метки на своих местах на рентгеновском Axxis?

Answer 1

Необходимо указать x как фактор. Вот и все.

ggplot(df, aes(x=factor(var.A), y=var.B)) + 
    geom_bar(position=position_dodge(), stat="identity", fill="#fff68f", colour="darkgrey", width = 0.4) + 
    xlab("") + 
    ylab("") + 
    scale_x_discrete(labels=c("aaaaaaa aaaaa","bbbbb bbb bbbb","cccc ccc","dddd dd ddddd","eee e eeeee e ee","ffffffff","gggggggg","hhhhhhh","iiii","jjjjjj","kkkkkkk","llllll","mmmmmmmm"))