O R é um programa livre multiplataforma para análises estatísticas que pode ser baixado em seu site ou adicionado na lista de repositórios de máquinas linux. Suas possibilidades de aplicação em diversas áreas são praticamente ilimitadas.
Neste blog postarei o resultado de minha experiência em sua utilização nas áreas de dinâmica de populações de peixes, ciência pesqueira e ecologia.
As postagens deste blog se destina, além de mim mesmo, a iniciantes no R e alunos da minha área de atuação.
Aprendi muito em livros e nas listas de discussão R-help e a R_STAT, mas ainda tenho muito pela frente. Agradeço desde já qualquer contribuição.

sexta-feira, 3 de dezembro de 2010

Cálculo da moda

O R trás funções para o cálculo da média (mean) e da mediana (median) mas não para moda. A sugestão postada na lista R-Help por Dr. Brian D. Ripley para distribuições discretas foi:
 
statmod <- function(x) {
  z <- table(as.vector(x))
  names(z)[z == max(z)]
}
 
n <- c(1,2,2,2,3,3)
statmod(n)
[1] "2"

5 comentários:

  1. Olá!

    Acho que copiando assim no R, tem um probleminha.

    Sugiro 1:
    statmod <- function(x) {
    z <- table(as.vector(x))
    names(z)[z == max(z)]
    }

    ou 2:
    statmod <- function(x) {
    z <- table(as.vector(x)); names(z)[z == max(z)]
    }

    Grato!

    ResponderExcluir
  2. Respostas
    1. Ola Guilherme, conseguiu descobrir como faz pada dados continuos ?

      Excluir