| dat <- sample(1:100000, 47) breaks <- seq(0, 100000, by = 10000) dat2 <- cut(dat, breaks = breaks) table(dat2) |
awishfullyway 2017-03-22 18:47 原文
| dat <- sample(1:100000, 47) breaks <- seq(0, 100000, by = 10000) dat2 <- cut(dat, breaks = breaks) table(dat2) |