
3 Jun
2015
3 Jun
'15
12:50
Seria isso? dados <- rnorm(10) a <- c(0.05767, 0.89000) sapply(a, function(x) as.integer(dados<x)) sapply(a, FUN=">", dados) À disposição. Walmes.