Bom dia,
Para uma regressão multipla linear qualquer:

> set.seed(1)
> B1 <- data.frame(x1=rpois(16,1),x2=rpois(16,2),x3=rpois(16,4),y=rpois(16,10))
> lm.B1=lm(y~x1+x2+x3)
> lm.B1=lm(y~x1+x2+x3,data=B1)
> plot(lm.B1)

Aperte <Enter> para ver o próximo gráfico: Resisuals versus Fitted
Aperte <Enter> para ver o próximo gráfico: Normal Q-Q
Aperte <Enter> para ver o próximo gráfico: Scale Location
Aperte <Enter> para ver o próximo gráfico: Residuals versus Leverage

Problema: Possuo um modelo não linear e gostaria de obter os mesmos gráficos para uma apresentação e para comparação dos dados, desta forma quais os ->comandos<- e dados necessários para plotar esses gráficos para qualquer modelo de predição?

No mais agradeço,
Tales