[R-es] Fwd: Ayuda ggplot2

[Alexa Aristizabal]

Muchas gracias por la ayuda me sirvió muchísimo, era justo lo que
necesitaba.

Ahora pretendiendo hacer exactamente lo mismo con otro dataset, me genera
el siguiente error al hacer el melt:

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")

Warning message:
attributes are not identical across measure variables; they will be dropped

Por lo que al final en el eje de las Y donde van los valores, éstos no se
distinguen.

Agradezco su colaboración.

Saludos,






El 24 de junio de 2016, 19:26, Karel L. via R-help-es <
r-help-es en r-project.org> escribió:

>
> 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 en r-project.org
> > https://stat.ethz.ch/mailman/listinfo/r-help-es
>
>
>         [[alternative HTML version deleted]]
>
>
> _______________________________________________
> R-help-es mailing list
> R-help-es en r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>

	[[alternative HTML version deleted]]