29 Mar
2012
29 Mar
'12
13:51
exemplo reproduzivel...................... set.seed(1) y = matrix(runif(500), nc=5) y = sweep(y, 1, rowSums(y), '/') y = t(apply(y, 1, cumsum)) library(plotrix) stackpoly(y) b