## Not run: ## We could re-generate the dataset by the following R code
# seed <- as.double(1)
# RANDU <- function() {
# seed <<- ((2^16 + 3) * seed) %% (2^31)
# seed/(2^31)
# }
# for(i in 1:400) {
# U <- c(RANDU(), RANDU(), RANDU(), RANDU(), RANDU())
# print(round(U[1:3], 6))
# }## End(Not run)
Run the code above in your browser using DataCamp Workspace