[R-br] Notação

[Edson Lira]

Tenho esse script abaixo:

require(PASWR)
trat<-rep(LETTERS[1:4],5)
med<-c(25,31,22,33,26,25,26,29,20,28,28,31,23,27,25,34,21,24,29,28)
exem1_4<-data.frame(med,trat)
exem1_4



m1<-lm(exem1_4$med~exem1_4$trat)
anova(m1)
summary(m1)

erro<-resid(m1)
erro

est<-predict(m1)
med-est

Quando gero o erro ele me dá essa saída.
  1       2         3   4   5         6         7         8         9        10        11        12        13        14        15        16        17 
 2.00e+00  4.00e+00 -4.00e+00  2.00e+00  3.00e+00 -2.00e+00 -3.33e-16 -2.00e+00 -3.00e+00  1.00e+00  2.00e+00 -1.11e-16  8.88e-16  1.11e-16 -1.00e+00  3.00e+00 -2.00e+00 
       18        19        20 
-3.00e+00  3.00e+00 -3.00e+00 
 
Gostaria de transformar estes números para a notação comum, tipo 2, 3, -4 ....

Me lembro que certa vez alguém postou esse problema, mas faz muito tempo. Alguém tem alguma sugestão?

Edson Lira
Estatístico
Manaus-Amazonas
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20120423/38310d26/attachment.html>