[R-br] Notação

[Paulo Justiniano]

O controle da notação cientifica é feito
em options()$scipen

> options()$scipen
[1] 0
> 10^6
[1] 1e+06
> options(scipen=1)
> 10^6
[1] 1e+06
> options(scipen=2)
> 10^6
[1] 1000000


?options para mais detalhes (ver scipen)




On Mon, 23 Apr 2012, Edson Lira wrote:

> 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
> 
>