[R-es] Leyenda gráfico combinado

Carlos Ortega co| @end|ng |rom qu@||tyexce||ence@e@
Dom Oct 4 21:09:26 CEST 2020


Hola,

Además de la alternativa de Emilio, como estás buscando incluir una fórmula
y el valor de ajuste sobre el gráfico, quizás te interese usar las
funcionalidades de este paquete:

   - *ggpmisc*:
   https://cran.r-project.org/web/packages/ggpmisc/vignettes/user-guide.html
   - Y en particular la función *stat_poly_eq()*.
   - Puedes ver ejemplos prácticos de esta función sobre a mitad de la
      viñeta.
      - Y que por cierto, permite además ajuste y representación del tipo
      *nls()* sobre tus datos .

Saludos,
Carlos Ortega
www.qualityexcellence.es

El dom., 4 oct. 2020 a las 16:07, Jimmy Erney Reyes Velasco (<
jimmyreyesvelasco using gmail.com>) escribió:

> Hola buenos días
> hice un gráfico combinado de líneas, puntos y barras en ggplot2, pero no sé
> cómo puedo poner la leyenda de eso gráfico para que me represente para las
> líneas con puntos los valores estimados por un modelo y observados.
> este es mi código:
> ggplot(MLM,aes(x=Individuo)) + geom_bar(aes(y=Observada), stat =
> "identity", color= "gray") +
>   geom_line(aes(y=Estimada), stat = "identity", color="blue", size=1.5) +
>   geom_point(aes(y=Estimada), shape=21, fill="blue", color="white")+
>   labs(y = expression(paste("Biomasa ", (g/cm^{2}))))+
>   ggtitle("Espeletia standleyana")+ theme_minimal()+
>   annotate(geom = 'text',
>            x = 0,
>            y = 750,
>            hjust = 0,
>            label = "Biomasa=220,774(IAF)+39,759(Aprom)-163,883")+
>   annotate(geom = 'text',
>            x = 0,
>            y = 700,
>            hjust = 0,
>            label = "R² = 0,982      P=3,8187E-17")
>
> ¿Alguien sabe cómo hacerlo? Agradezco mucho cualquier información.
> que tengan buen día
>
> <
> https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail
> >
> Libre
> de virus. www.avast.com
> <
> https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail
> >
> <#DAB4FAD8-2DD7-40BB-A1B8-4E2AA1F9FDF2>
>
>         [[alternative HTML version deleted]]
>
> _______________________________________________
> R-help-es mailing list
> R-help-es using r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>


-- 
Saludos,
Carlos Ortega
www.qualityexcellence.es

	[[alternative HTML version deleted]]



Más información sobre la lista de distribución R-help-es