Hola,

library(reshape2)
library(ggplot2)

emp <- read.csv("tamano_empresas.csv", header=TRUE, sep=";", 
comment.char="" , strip.white=FALSE, dec = ",")

melted = melt(emp, id.vars="Empresas")

# Para lo que quieres esto te valdr�
melted$variable<-substring(melted$variable, first = 2, last = 5)

ggplot(data=melted, aes(as.factor(variable), value)) +
   geom_line(aes(colour = Empresas, group = Empresas)) +
   facet_wrap(~ Empresas)+
   xlab("A�os")

Saludos,


El 24/06/16 a las 18:51, Alexa Aristizabal escribi�:
> Hola a todos!
>
> Soy nueva en R y necesito hacer unos gr�ficos para una investigaci�n, 
> he explorado un poco y estoy intentando usar ggplot2 ya que hace 
> gr�ficos de muy buena calidad...tengo los datos de varios a�os para 
> diferentes grupos de empresas y los pretendo graficar tanto en un solo 
> grafico como en varios (facet_wrap) pero tengo problemas con el eje de 
> las X, ya que necesito que aparezcan los a�os es decir, 2003, 2004 y 
> as� ....y no X2003, X2004 que es como est�n apareciendo.
>
> Este es mi c�digo:
>
> library(reshape2)
> library(ggplot2)
>
> emp <- read.csv("C:/Users/usuario/Documents/tamano_empresas.csv", 
> header=TRUE, sep=";", comment.char="" , strip.white=FALSE, dec = ",")
>
> melted = melt(emp, id.vars="Empresas")
>
> ggplot(data=melted, aes(variable, value)) + geom_line(aes(colour = 
> Empresas, group = Empresas)) + facet_wrap(~ Empresas)
>
>
> Agradezco cualquier ayuda. Adjunto el dataset.
>
> Muchas gracias.
>
>
>
> _______________________________________________
> R-help-es mailing list
> R-help-es@r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es


        [[alternative HTML version deleted]]

_______________________________________________
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

Responder a