R/startId.R
In lucgar/synRNASeqNet: Synthetic RNA-Seq Network Generation and Mutual Information Estimates
startId <-
function(n){
if(n < 1) stop("n must be positive")
if(n == 1) return(1)
ans <- c(1, rep(0, (n-1)))
for(i in 2:n) ans[i] <- ans[i-1] + (i-1)
return(ans)
}
lucgar/synRNASeqNet documentation built on May 21, 2019, 8:54 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.
startId <-
function(n){
if(n < 1) stop("n must be positive")
if(n == 1) return(1)
ans <- c(1, rep(0, (n-1)))
for(i in 2:n) ans[i] <- ans[i-1] + (i-1)
return(ans)
}
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.