摘要:
001、 a <- c(0, 0, 0, 0) b <- c(9, -8, -15, 54) c <- c(8, 2, 8, 9) d <- c(0, 0, 0, 0) dat <- data.frame(a, b, c, d) ## 测试数据框 dat result <- vector() for 阅读全文
摘要:
001、 dat <- rbind(a = 1:5, b = letters[1:5], c = LETTERS[1:5], d = 10:6) ## 测试数据框 dat idx <- order(c(t(row(dat))), runif(length(dat))) idx dat2 <- mat 阅读全文