亲爱的,我正在试图在ggplot中制作条形图,但我没有得到结果。数据框是下一个:
z=data.frame(x1=read.table(textConnection("
Indicador
Total
Max.
Min.
Mean
Promedio.Aparatos
Promedio.Automotriz
Promedio.Belleza
Promedio.C.Internet
Promedio.Comp
Promedio.Deportes
Promedio.Educación
Promedio.Entretenimiento
Promedio.Gasolina
Promedio.C.Comerciales
Promedio.ATMs
Promedio.Hogar
Promedio.Libros.y.Música
Promedio.Moda
Promedio.Pagos.e.Impuestos
Promedio.Salud
Promedio.Servicios.Varios
Promedio.Supermercados
Promedio.Telefonia
Promedio.Viajes
Porcentaje.Aparatos
Porcentaje.Automotriz
PorcentajeBelleza
PorcentajeCompras.en.Internet
PorcentajeComputación
PorcentajeDeportes
PorcentajeEducación
PorcentajeEntretenimiento
PorcentajeGasolina
PorcentajeCentros.Comerciales
PorcentajeATMs
PorcentajeHogar
PorcentajeLibros.y.Música
PorcentajeModa
PorcentajePagos.e.Impuestos
PorcentajeSalud
PorcentajeServicios.Varios
PorcentajeSupermercados
PorcentajeTelefonia
PorcentajeViajes
"),header=T),
x2=read.table(textConnection("
Número
36001
35916
12320
35889
4487
2751
673
1023
1062
4602
824
4438
4021
2577
31845
5443
641
6982
32868
4696
1594
9746
6239
13170
3973
2526
540
834
964
4291
755
3627
3254
2186
30356
4855
488
6612
33079
4105
1314
9284
5777
9666
"),header=TRUE))
我构建了这个data.frame,因为我想使用有序数据
tabla=z[order(z$Número,decreasing=TRUE),]
我正在尝试使用ggplot,但我没有得到与变量Indicador有关的垂直标签的条形图。我想在x轴变量Indicador和y轴变量Número 但是使用这段代码我会得到一个丑陋的情节:
qplot(Indicador, data = tabla, geom = "bar")
x轴上的所有标签只有一行。 感谢您的帮助,有人可以帮助我如何在酒吧中添加颜色。
答案 0 :(得分:41)
为了更好地控制使用函数ggplot()
的参数。
首先,您应该根据Indicador
对变量Número
重新排序,以获得有序的条形图。 tabla$Número
之前的减号表示逆序(从最高到最低)。
tabla$Indicador<-reorder(tabla$Indicador,-tabla$Número)
然后您应该提供x和y值并使用stat="identity"
内的geom_bar()
来绘制实际值。使用theme()
和axis.text.x=
,您可以更改文字方向,还可以调整x轴下文字的垂直和水平位置。
ggplot(tabla,aes(Indicador,Número))+
geom_bar(stat="identity")+
theme(axis.text.x=element_text(angle=90,hjust=1,vjust=0.5))
建议:在出版物中,使用45度的东西看起来更好:
theme(axis.text.x=element_text(angle=45,hjust=1,vjust=0.5))