Yo soy el trazado de la presencia de una especie de acuerdo a múltiples variables en la misma parcela. Hay muchas otras variables, pero sólo he mantenido los más importantes para el bien de este post:

 > str(GH) 
 'data.frame':  288 obs. of  21 variables: 
 $ Ee       : int  2 2 1 7 6 3 0 9 3 7 ... 
 $ height   : num  14 25.5 25 21.5 18.5 36 18 31.5 28.5 19 ... 
 $ legumes  : num  0 0 55 30 0 0 55 10 30 0 ... 
 $ grass    : num  60 50 30 35 40 35 40 40 35 30 ... 
 $ forbs    : num  40 70 40 50 65 70 40 65 70 70 ... 

Me las he arreglado para la trama de esta multa, y obtener un aspecto agradable de usar (donde Ee es la especie en cuestión):

ggplot(data=GH,aes(y=y,x=x),ylab="Number of individuals (N)",xlab="Percentage cover (%); OR  Height(cm))+
geom_jitter(aes(legumes,Ee),colour="blue")+ 
geom_jitter(aes(grass,Ee),colour="green")+ 
geom_jitter(aes(forbs,Ee),colour="red")+ 
geom_jitter(aes(height,Ee),colour="black") 

Sin embargo, quiero añadir líneas de regresión para cada una de las variables (y calcular el R cuadrado valor), y han tenido ninguna suerte hasta ahora. También las etiquetas de los ejes, se niegan a cambiar de X y y que yo nunca han encontrado antes de. Podría alguien darme alguna ayuda sobre esto? Saludos

  • Usted parece estar tratando de etiqueta ggplot como base de gráficos. Esto no va a funcionar. Trate de + labs(x = "Percentage cover (%)", y = "Number of individuals (N)")
InformationsquelleAutor user25002 | 2014-09-09

1 Comentario

  1. 9

    Utilizando geom_smooth geom en ggplot2 obtiene líneas de regresión para mostrar. Estoy usando mtcars conjunto de datos ya que es muy similar a la tuya:

    ggplot(mtcars) + 
      geom_jitter(aes(disp,mpg), colour="blue") + geom_smooth(aes(disp,mpg), method=lm, se=FALSE) +
      geom_jitter(aes(hp,mpg), colour="green") + geom_smooth(aes(hp,mpg), method=lm, se=FALSE) +
      geom_jitter(aes(qsec,mpg), colour="red") + geom_smooth(aes(qsec,mpg), method=lm, se=FALSE) +
      labs(x = "Percentage cover (%)", y = "Number of individuals (N)")

    También, he quitado aes(y=y,x=x) de ggplot como se lleva ningún significado. El resultado:

    varios ggplot de regresión lineal de las líneas de

    Hay más elaborada (pero mejor) método para llevar a cabo la misma mediante melt de reshape2 paquete:

    require(ggplot2)
    require(reshape2)
    mtcars2 = melt(mtcars, id.vars='mpg')
    ggplot(mtcars2) +
      geom_jitter(aes(value,mpg, colour=variable),) + geom_smooth(aes(value,mpg, colour=variable), method=lm, se=FALSE) +
      facet_wrap(~variable, scales="free_x") +
      labs(x = "Percentage cover (%)", y = "Number of individuals (N)")

    Un elemento importante de esta solución es la opción scales="free_x" que permite independiente de la escala de X en cada faceta de la parcela.

    varios ggplot de regresión lineal de las líneas de

    • Perfecto! Eso es exactamente lo que yo quería hacer! Gracias. Primera vez jugando con ggplot. ¿Sabe usted cómo yo podría añadir la R sq. los valores para cada una de las líneas? Tengo los valores mediante el uso de: Eeleg<-lm(Ee~legumbres), etc, pero me gustaría colocarlos en el gráfico
    • de una manera: stackoverflow.com/a/7549819/59470
    • Es posible incluir los coeficientes de correlación, laderas, y las intersecciones con este enfoque?

Dejar respuesta

Please enter your comment!
Please enter your name here