Esperando que alguien pueda ayudarme a etiquetar columnas de un gráfico de barras agrupadas con porcentajes. No pude encontrar una publicación existente que pudiera hacer que el trabajo fuera exitoso. A continuación se muestra el código para un marco de datos de ejemplo básico.

Service<-c("AS","AS","PS","PS","RS","RS","ES","ES")

Year<-c("2015","2016","2015","2016","2015","2016","2015","2016")

Q1<-c("Dissatisfied","Satisfied","Satisfied","Satisfied","Dissatisfied","Dissatisfied","Satisfied","Satisfied")

Q2<-c("Dissatisfied","Dissatisfied","Satisfied","Dissatisfied","Dissatisfied","Satisfied","Satisfied","Satisfied")

Example<-data.frame(Service,Year,Q1,Q2)

Luego, lo fundí con Reshape2 para poder trazar las variables de columna Q1 y Q2 a lo largo del eje x. Luego creé un gráfico de barras agrupado básico con ggplot2, con recuentos en el eje y, y luego una faceta por año.

ExampleM<-melt(Example,id.vars=c("Service","Year"))

ggplot(ExampleM,aes(x=variable,stat="identity",fill=value)) + 
  geom_bar(position="dodge") + facet_grid(~Year)

Con lo que estoy luchando es cómo agregar etiquetas de columna. Específicamente, me gustaría saber cómo agregar conteos de frecuencia básicos, así como porcentajes. No los dos juntos, sino uno u otro. No puedo hacer que ninguno funcione. Intenté usar "+ geom_text (aes (labels =" pero no estoy seguro de qué poner como etiqueta ya que usé stat = "identity" en el código ggplot.

Además, para porcentajes, ¿debo calcularlo primero con dplyr, o puedo calcular los porcentajes dentro del código ggplot? Tampoco sé lo suficiente sobre las etiquetas en R, así que no estoy seguro de cómo agregar el signo% real.

¡Esperando que alguien pueda mostrarme una forma básica de lograr todo esto!