grouped ggplot changing barplot bar r ggplot2

changing - Barplot horizontal en ggplot2



ggplot title center (1)

ggplot(df, aes(x=reorder(Seller, Num), y=Avg_Cost)) + geom_bar(stat=''identity'') + coord_flip()

Sin stat=''identity'' ggplot desea agregar sus datos en recuentos.

Estaba trabajando en hacer un diagrama de puntos horizontal (?) En ggplot2 , y me hizo pensar en intentar crear una barra horizontal. Sin embargo, estoy encontrando algunas limitaciones para poder hacer esto.

Aquí están mis datos:

df <- data.frame(Seller=c("Ad","Rt","Ra","Mo","Ao","Do"), Avg_Cost=c(5.30,3.72,2.91,2.64,1.17,1.10), Num=c(6:1)) df str(df)

Inicialmente, generé un diagrama de puntos usando el siguiente código:

require(ggplot2) ggplot(df, aes(x=Avg_Cost, y=reorder(Seller,Num))) + geom_point(colour="black",fill="lightgreen") + opts(title="Avg Cost") + ylab("Region") + xlab("") + ylab("") + xlim(c(0,7)) + opts(plot.title = theme_text(face = "bold", size=15)) + opts(axis.text.y = theme_text(family = "sans", face = "bold", size = 12)) + opts(axis.text.x = theme_text(family = "sans", face = "bold", size = 12))

Sin embargo, ahora estoy tratando de crear una barra de barras horizontal y encontrar que no puedo hacerlo. Intenté coord_flip() y eso tampoco fue útil.

ggplot(df, aes(x=Avg_Cost, y=reorder(Seller,Num))) + geom_bar(colour="black",fill="lightgreen") + opts(title="Avg Cost") + ylab("Region") + xlab("") + ylab("") + xlim(c(0,7)) + opts(plot.title = theme_text(face = "bold", size=15)) + opts(axis.text.y = theme_text(family = "sans", face = "bold", size = 12)) + opts(axis.text.x = theme_text(family = "sans", face = "bold", size = 12))

¿Alguien puede proporcionar ayuda sobre cómo generar una barra de ggplot2 horizontal en ggplot2 ?