# NOT RUN {
## small example
X = cbind.data.frame(rnorm(10^4),
rnorm(10^4),
rnorm(10^4))
suppressMessages({
my.DN = create.DN(x = X,
RS.num = 10^3,
DN.num1 = 500,
DN.num2 = 250,
no.cores = 0,
make.pbs = FALSE)
})
my.DN$`Data Nuggets`
my.DN$`Data Nugget Assignments`
# }
# NOT RUN {
## large example
X = cbind.data.frame(rnorm(10^6),
rnorm(10^6),
rnorm(10^6),
rnorm(10^6),
rnorm(10^6))
my.DN = create.DN(x = X,
RS.num = 10^5,
DN.num1 = 10^4,
DN.num2 = 2000)
my.DN$`Data Nuggets`
my.DN$`Data Nugget Assignments`
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab