Description Usage Arguments Value Examples
View source: R/FastLORS_Functions.R
Run_LORS_Screening
Run_LORS_Screening
is a function to to apply the LORS-Screening Algorithm in Yang et al. (2013)
1 | Run_LORS_Screening(Y, X, lambda = NULL)
|
Y |
gene expression matrix |
X |
matrix of SNPs |
lambda |
tuning parameter |
selectedSNPs the SNPs selected by LORS-Screening
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 | ##Example
## Generate some data
n <- 50
p <- 200
q <- 100
k <- 10
set.seed(123)
X <- matrix(rbinom(n*p,1,0.5),n,p)
L <- matrix(rnorm(n*k),n,k) %*% t(matrix(rnorm(q*k),q,k))
B <- matrix(0, ncol(X), ncol(L))
activeSNPs <- sort(sample(c(1:nrow(B)), 20))
for(i in 1:length(activeSNPs)){
genes_influenced <- sort(sample(c(1:ncol(B)),5))
B[activeSNPs[i], genes_influenced] <- 2
}
E <- matrix(rnorm(n*q),n,q)
Y <- X %*% B + L + E
selectedSNPs <- Run_LORS_Screening(Y, X)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.