Displaying 1 result from an estimated 1 matches for "c1dd886d".
2012 Apr 26
1
conocer los mínimos
Encontré mi error, ahora funciona perfecto,
Animal <- c('A','A','A','B','B','C','D','D')
Edad <- c(2,3,4,3,4,2,4,5)
datos <- data.frame(Animal, Edad)
m_m <- with(datos, tapply(Edad, Animal, function(x){
minimo <- min(x)
valor <- length(x)
rep(minimo, valor)
}))
datos$repetido <- do.call(c, m_m)
datos