bom dia,
o meu quadro das estatísticas do output esta de uma forma estranha:
# Estatística por ano
porano<-apply(dados[,-1],2,function(x)c(summary(x),0)[1:7])
desviopadrão<-sd(dados[,-1], na.rm= TRUE)
Warning message:
sd(<data.frame>) is deprecated.
Use sapply(*, sd) instead.
variância<-var(dados[,-1], na.rm= TRUE)
amplitude<-apply(dados[,-1],2,range, na.rm= TRUE)
rownames(porano) <- c('Minimo','Primeiro
quartil','Mediana','Média','Terceiro Quartil','Máximo','NAs')
porano<-rbind(porano,'Desviopadrão','Variância','Amplitude')
colnames(porano) = 2008:2012
desviopadrão
X2008 X2009 X2010 X2011 X2012
5.492936 4.433807 4.226329 3.919534 4.968671
variância
X2008 X2009 X2010 X2011 X2012
X2008 30.172348 15.315341 12.590909 13.140152 8.883523
X2009 15.315341 19.079545 13.514205 9.153409 5.238636
X2010 12.590909 13.514205 18.329545 11.909091 5.261364
X2011 13.140152 9.153409 11.909091 15.047348 8.272727
X2012 8.883523 5.238636 5.261364 8.272727 13.528409
amplitude
X2008 X2009 X2010 X2011 X2012
[1,] 61 64 68 65 57
[2,] 82 83 84 85 85
porano
2008 2009 2010 2011
Minimo "61" "64" "68" "65"
Primeiro quartil "70" "71" "72.25" "75"
Mediana "74" "75" "75.5" "77"
Média "72.88" "74.09" "75.68" "76.97"
Terceiro Quartil "76" "76" "79" "78.75"
Máximo "82" "83" "84" "85"
NAs "4" "3" "3" "3"
"Desviopadrão" "Desviopadrão" "Desviopadrão" "Desviopadrão"
"Variância" "Variância" "Variância" "Variância"
"Amplitude" "Amplitude" "Amplitude" "Amplitude"
2012
Minimo "57"
Primeiro quartil "75"
Mediana "78"
Média "77.08"
Terceiro Quartil "81"
Máximo "85"
NAs "0"
"Desviopadrão"
"Variância"
"Amplitude"
eu quero da forma:
2008 2009 2010 2011 2012
name.est valor de cada ano sem aspas
exemplo:
mínimo valor2008 valor2009 valor2010 valor2011 valor2012
desviopadrão valor2008 valor2009 valor2010 valor2011 valor2012
o que poderá estar a acontecer?
Cumprimentos Ana Rocha
_______________________________________________
R-br mailing list
[email protected]
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código
mínimo reproduzível.
