
1 Mar
2017
1 Mar
'17
12:54
x <- matrix(as.character(rnorm(100)), ncol = 10) typeof(x) apply(x, MARGIN = 2, FUN = function(i) { sum(as.numeric(i)) }) À disposição. Walmes.