Как разместить надписи на geom_bar в R с помощью ggplot2

Я бы хотел, чтобы несколько надписей располагались поверх графика geom_bar . Вот пример:

df <- data.frame(x=factor(c(TRUE,TRUE,TRUE,TRUE,TRUE,FALSE,FALSE,FALSE)))
ggplot(df) + geom_bar(aes(x,fill=x)) + opts(axis.text.x=theme_blank(),axis.ticks=theme_blank(),axis.title.x=theme_blank(),legend.title=theme_blank(),axis.title.y=theme_blank())

Теперь

table (df $ x)

FALSE  TRUE 
    3     5 

Я бы хотел, чтобы 3 и 5 были поверх двух столбцов. Еще лучше, если бы у меня были и процентные значения. Например. 3 (37,5%) и 5 (62,5%) . Вот так:
_{(источник: skitch.com )}

Возможно ли это? Если да, то как?