- Estou digitando a fórmula:
Mode <- function(x) { ux <- unique(x) ux[which.max(tabulate(match(x, ux)))] }
- E depois:
mode(c(1, 2, 2, 2, 2, 3, 4, 5, 5, 6, 7))
- Mas, ele está me retornando:
[1] "numeric"
O que estou fazendo de errado?
Você está vendo a versão anterior da nova experiência da Alura que estamos preparando para você. Em breve, ela ganha uma identidade visual novinha totalmente pensada em potencializar seus estudos!
Solucionado
Mode <- function(x) { ux <- unique(x) ux[which.max(tabulate(match(x, ux)))] }
mode(c(1, 2, 2, 2, 2, 3, 4, 5, 5, 6, 7))
[1] "numeric"
O que estou fazendo de errado?
Olá Thiago,
Acredito que seja apenas um detalhe no nome da variável. Você criou Mode mas está chamando mode, tenta novamente com tudo em minúsculo que deve resolver.
Espero ter ajudado, qualquer coisa é só falar!