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