Calculando el número de puntos se encuentran arriba y abajo de la línea de regresión con R

Question

¿Cómo calculo el número de puntos que se encuentran arriba y abajo de la línea de regresión en un diagrama de dispersión?

data = read.csv("info.csv") 
par(pty = "s") 
plot(data$col1, data$col2, xlab = "xaxis", ylab = "yaxis", xlim = c(0, 
    1), cex.lab = 1.5, cex.axis = 1.5, ylim = c(0, 1), col.lab = "red", 
    col = "blue", pch = 19) 
abline(a = -1.21, b = 2.21) 

Answer 1

x <- 1:10 
set.seed(1) 
y <- 2*x+rnorm(10) 

plot(y~x) 

fit <- lm(y~x) 
abline(fit) 

resi <- resid(fit) 
#below the fit: 
sum(resi < 0) 
#above the fit: 
sum(resi > 0) 

Editar: Si lo hizo (por alguna razón desconocida) algo como esto:

x <- 1:10 
set.seed(1) 
y <- 2*x+rnorm(10) 

plot(y~x) 
abline(-0.17,2.05) 

usted puede hacer esto:

yfit <- 2.05 * x - 0.17 
resi <- y - yfit 

sum(resi < 0) 
sum(resi > 0) 

Answer 2

Si yo' Si leyó la pregunta correctamente, la respuesta sería.

1. determinar la ecuación de la recta de regresión - es recta y habrá de la forma y = mx + b, donde m es la pendiente de la línea y b es la intersección.
2. Calcula el valor y para cada x en el dominio de x.
3. Usando el valor de y que tiene en sus datos, determinar si es mayor, igual o menor que el valor calculado de y

usando lo anterior debe ser suficiente para encontrar los números (recuento) estás después