Я хотел бы скорректировать текст на графике.

Я попытался настроить hjust / vjust для отображения так, как мне нравится, но кажется, что он не работает должным образом.

ggplot(data) + 
        geom_bar(aes(name, count, 
        fill = week), stat='identity', position = 'dodge') +
        geom_text(aes(name,count, 
        label=count),hjust=0.5, vjust=3, size=2,
        position = position_dodge(width = 1)) + 
        coord_flip()

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