Olha se eu entendi, vc quer colocar uma linha em cada plot. Veja a documentação de ?pairs e os exemplos la que podem te dar varias ideias. Mas acho que é isso que você precisa #faça uma função panel, que vai lidar com os pontos de cada quadradinho #aqui eu ploto os pontos e a linha. panel.lm <- function(x, y) { points(y~x) abline(lm(y~x)) } #dai é so entrar com a função, no caso eu escolhi faze isso na diagonal inferior, mas voce pode setar como quiser. pairs(data,lower.panel=panel.lm) Lembrando que plot e pairs são a mesma coisa nesse caso, com vc entrando com um data.frame. E evite postar em multiplas listas. Espero ter ajudado. -- Grato Augusto C. A. Ribas Site Pessoal: http://recologia.wordpress.com/ Lattes: http://lattes.cnpq.br/7355685961127056