El siguiente ejemplo usa la regresión lineal para predecir la cantidad de compra(o demanda) según el precio. El calculo "manual" en excel puede descargarse AQUI. El resultado del excel seria este:

El gráfico de dispersión sería este:
y la representación de la ecuación con la salida de R, seria esta:
El script en R:
# Regrasion lineal simple # ---------------------------------------- # carga csv desde dropbox datos.url <-'https://www.dropbox.com/s/ypbwibxjzd9ebx5/CantPrecio.csv?dl=1' datos <-read.csv(datos.url) # ---------------------------------------- # Creacion del modelo lineal modelo.lm <-lm(cant ~ precio, datos) # ---------------------------------------- # grafico de dispersion de las dos variables plot(datos$precio,datos$cant) abline(modelo.lm, col="red") # recta de regresion # ---------------------------------------- # detalle del modelo de regresion summary(modelo.lm) # ---------------------------------------- #Crea representacion de ecuacion de regresion y <- all.vars(modelo.lm$call)[1] B_0 <- round(modelo.lm$coef[1],2) B_1 <- round(modelo.lm$coef[2],2) x_1 <- names(modelo.lm$coef[2]) error <- round(as.numeric(summary(modelo.lm)[6]),2) paste(y,"=",B_0,"+",B_1,"*",x_1,"+",error) #representacion de ecuacion
Referencias:
1. https://dl.dropboxusercontent.com/u/59930995/Regresi%C3%B3n%20LIneal.pdf
2. https://www.youtube.com/watch?v=66z_MRwtFJM
3. http://html.rincondelvago.com/regresion-lineal-simple.html
4. libro de econometria:
http://justmyebook.blogspot.com.ar/2014/08/introduccion-la-econometria.html
excelente
ResponderEliminar