Pregunta ¿Cómo puedo trazar mi valor de R Squared en mi diagrama de dispersión usando R?


Parece una pregunta simple, así que espero que sea una respuesta simple. Estoy tramando mis puntos y ajustando un modelo lineal, que puedo hacer bien. Entonces quiero trazar algunas estadísticas de resumen, por ejemplo, el valor de R Squared, en la trama también. Solo puedo obtener el valor de R Squared en la línea de comando. Algún consejo; ¿Debo estar mirando ggplot o cualquier otra cosa? Gracias por adelantado.

#Does the plot
plot(df$VAR1, df$VAR2)
#Adds the line
abline(lm(df$VAR2~df$VAR1), col="red")
#Shows stats on command line
summary(lm(df$VAR2~df$VAR1))

17
2017-09-21 14:37


origen


Respuestas:


Puedes abusar legend() porque tiene la práctica ubicación lógica:

R> DF <- data.frame(VAR1=rnorm(100), VAR2=rnorm(100))
R> with(DF, plot(VAR1, VAR2))
R> abline(fit <- lm(VAR2 ~ VAR1, data=DF), col='red')
R> legend("topright", bty="n", legend=paste("R2 is", 
+         format(summary(fit)$adj.r.squared, digits=4)))

aquí bty="n" suprime la caja y necesitas format() para acortar la pantalla. Otro text() es bueno, como lo son los argumentos main= y sub= a plot().


29
2017-09-21 14:48



los text función coloca texto en la gráfica actual, es una opción para agregar el valor r-cuadrado a una gráfica. También mira el grconvertX y grconvertY funciones para encontrar la ubicación para colocar el texto.

los corner.label y emptyspace funciones en el plotrix el paquete también puede ayudar.


7
2017-09-21 15:13