Buenos dias Javier,
Esta es una sugerencia para hacer lo que quieres:
# Ejemplo
x <- rnorm(100)
y <- 2 + 1.9*x + rnorm(100)
reg <- lm(y ~x)
summary(reg)
# Gráfico
plot(x,y)
abline(reg, col = 2)
legend('topleft', c('Real','Ajustado'), pch = c(1, NA), lty = c(NA, 1), col
= c(1,2))
Si debes realizar muchas regresiones al mismo tiempo, te sugerirÃa construir
una función que genere y guarde los gráficos, además de información
relevante acerca del modelo ajustado. Una función útil en estos casos es
lmList(). Ahora, si adicional al modelo ajustado requieres intervalos de
confianza y predicción, en los ejemplos de ?predict.lm puedes encontrar algo
que puede ayudarte.
Otro punto en el que (quizás) puedes estar interesado es en agregar
información del modelo ajustado en el gráfico (en general el valor de R^2 y
el valor p de la prueba F). Para ello la función text() es de muchÃsima
utilidad.
Saludos,
    Jorge Ivan Velez
2009/11/6 JAVIER MARTINEZ LOPEZ <>
Hola,
estoy haciendo una tanda de regresiones en R y no sé por qué no salen las
lÃneas de regresión en muchas de las gráfica, aún siendo regresiones
significativas y con un ajuste medio-alto. Yo hago un plot de las variables
y luego hago "abline" de la regresión, pero no siempre aparce la lÃnea de
regresión, mientras que con otro programas sà que aparece. ¿Alguien sabe por
qué? Necesito hacerlo en R porque son miles de regresiones!
Gracias y saludos,
Javier MartÃnez