Eu resolvi assim também

passeio<-function(n)

{

medias<-NULL

sd<-NULL

for (i in 1:n)

{

  medias[i]<-mean(dados2[,i])

  sd[i]<-sd(dados2[,i])

}

cbind(print(medias),print(sd))

}

passeio(10)

Obrigado pessoal.

André Oliveira Souza.
Graduação em Matemática, mestrado em estatística aplicada.Instituto Federal de Educação, Ciência e Tecnologia do Espirito Santo.  IFES

Em Quarta-feira, 1 de Outubro de 2014 17:03, Luciano F. Sgarbi <luciano.f.sgarbi@gmail.com> escreveu:

apply(dados,2,sd)
apply(dados,2,mean)

Em 01/10/2014 16:59, "Andre Oliveira" <andreolsouza@yahoo.com.br> escreveu:

Pessoal tenho uma matriz 10 por 10 com nome de dados.

Gostaria que fazer o seguinte para i variando de 1 a 10 e guardar a média e desviopadrão.

sd(dados2[,i])

mean(dados2[,i])

 

André Oliveira Souza.
Graduação em Matemática, mestrado em estatística aplicada.Instituto Federal de Educação, Ciência e Tecnologia do Espirito Santo.  IFES

_______________________________________________
R-br mailing list
R-br@listas.c3sl.ufpr.br
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.

_______________________________________________
R-br mailing list
R-br@listas.c3sl.ufpr.br
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.