release_process/Hall/more_controllable_data_gen.R
In AndrewM1130/GA: On Multivariate Feature Selection with Genetic Algorithms
generate_data <- function() {
s <- 5
b<-matrix(round(20*.9^(1:50),2),nc=1)
x_mat<-matrix(runif(50*1000,0,100),nc=50)
bx <- x_mat %*% b
y_vec <- rnorm(1000,bx,s)
return(cbind(y_vec,x_mat))
}
AndrewM1130/GA documentation built on July 9, 2022, 11:43 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
generate_data <- function() {
s <- 5
b<-matrix(round(20*.9^(1:50),2),nc=1)
x_mat<-matrix(runif(50*1000,0,100),nc=50)
bx <- x_mat %*% b
y_vec <- rnorm(1000,bx,s)
return(cbind(y_vec,x_mat))
}
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.