Cómo usar la función abline () en R para agregar líneas rectas a los gráficos

La función abline () en R se puede usar para agregar una o más líneas rectas a una gráfica en R. La sintaxis básica es de abline () es la siguiente:

  • a, b: valores únicos que especifican la intersección y la pendiente de la línea
  • h: el valor de y para la línea horizontal
  • v: el valor x de la línea vertical

Para la documentación completa de la función abline (), echa un vistazo a la página de I Documentación .

Cómo agregar líneas horizontales

El código básico para agregar una línea horizontal a una gráfica en R es: abline (h = algún valor)

Supongamos que tenemos el siguiente diagrama de dispersión que muestra los valores para x y y en un conjunto de datos:

#define dataset
 data <- data.frame (x = c (1, 1, 2, 3, 4, 4, 5, 6, 7, 7, 8, 9, 10, 11, 11),
                   y = c (13, 14, 17, 12, 23, 24, 25, 25, 24, 28, 32, 33, 35, 40, 41))

#plot x y Y valores en el conjunto de datos
 de parcela (datos $ x, $ y datos, PCH = 16)

Diagrama de dispersión en R

Para agregar una línea horizontal en el valor y = 20, podemos usar el siguiente código:

Tenga en cuenta que lwd = 2 especifica que queremos que el ancho de línea sea igual a 2 (predeterminado = 1).

abline (h = 20, col = 'coral2', lwd = 2)

Ejemplo de abline () en R

El siguiente código ilustra cómo agregar una línea continua horizontal en el valor medio de y junto con dos líneas discontinuas horizontales en una desviación estándar por encima y por debajo del valor medio:

Tenga en cuenta que lty = 2 especifica que queremos que la línea sea discontinua.

diagrama de dispersión #create para x y y
plot (datos $ x, datos $ y, pch = 16)

# crear una línea horizontal en el valor medio de y
 abline (h = mean (data $ y), lwd = 2)

#cree líneas horizontales con una desviación estándar por encima y por debajo del valor medio
 abline (h = mean (data $ y) + sd (data $ y), col = 'steelblue', lwd = 3, lty = 2)
abline (h = mean (data $ y) - sd (data $ y), col = 'steelblue', lwd = 3, lty = 2)

Líneas horizontales en R usando la función abline ()

Cómo agregar líneas verticales

El código básico para agregar una línea vertical a una gráfica en R es: abline (v = algún valor)

El siguiente código ilustra cómo agregar una línea vertical en el valor medio en un histograma:

#Haga que este ejemplo sea reproducible
 set.seed (0)

# crear un conjunto de datos con 1000 valores aleatorios normalmente distribuidos con media = 10, sd = 2
 datos <- rnorm (1000, media = 10, sd = 2)

#crear histograma de valores de datos
 hist (data, col = 'steelblue')

#dibujar una línea punteada vertical en el valor medio
 abline (v = mean (data), lwd = 3, lty = 2)

Abline en un histograma en R

Cómo agregar líneas de regresión

El código básico para agregar una línea de regresión lineal simple a una gráfica en R es: abline (reg_model)

donde reg_model es una línea de regresión ajustada creada usando la función lm ().

El siguiente código ilustra cómo agregar una línea de regresión lineal ajustada a un diagrama de dispersión:

#define dataset
 data <- data.frame (x = c (1, 1, 2, 3, 4, 4, 5, 6, 7, 7, 8, 9, 10, 11, 11),
                   y = c (13, 14, 17, 12, 23, 24, 25, 25, 24, 28, 32, 33, 35, 40, 41))

diagrama de dispersión #create de x y y valores de
 trama (datos $ x, $ y datos, PCH = 16)

#ajustar un modelo de regresión lineal a los datos
 reg_model <- lm (y ~ x, data = data)

#agregue la línea de regresión ajustada a la línea del diagrama de
 dispersión (reg_model, col = "steelblue")

Abline () de una línea de regresión en R

Tenga en cuenta que simplemente necesitamos un valor para la intersección y la pendiente para ajustar una línea de regresión lineal simple a los datos usando la función abline (). Por lo tanto, otra forma (aunque más tediosa) de usar abline () para agregar una línea de regresión es especificar explícitamente los coeficientes de intersección y pendiente del modelo de regresión:

#define dataset
 data <- data.frame (x = c (1, 1, 2, 3, 4, 4, 5, 6, 7, 7, 8, 9, 10, 11, 11),
                   y = c (13, 14, 17, 12, 23, 24, 25, 25, 24, 28, 32, 33, 35, 40, 41))

diagrama de dispersión #create de x y y valores de
 trama (datos $ x, $ y datos, PCH = 16)

#ajustar un modelo de regresión lineal a los datos
 reg_model <- lm (y ~ x, data = data)

#definir los valores de intersección y pendiente
 a <- coeficientes (reg_model) [1] #intercepción 
b <- coeficientes (reg_model) [2] #slope

#agregue la línea de regresión ajustada al diagrama de dispersión
 abline (a = a, b = b, col = "steelblue")

Abline () de una línea de regresión en R con intersección y pendiente específicas

Observe que esto produce la misma línea que antes.

  • https://r-project.org
  • https://www.python.org/
  • https://www.stata.com/

Deja un comentario

Se utiliza una prueba de bondad de ajuste de chi-cuadrado para determinar si una variable categórica sigue o no una…
statologos comunidad-2

Compartimos información EXCLUSIVA y GRATUITA solo para suscriptores (cursos privados, programas, consejos y mucho más)

You have Successfully Subscribed!