Gitlab is now using https://gitlab.lcsb.uni.lu as it's primary address. Please update your bookmarks. FAQ.

Commit b61519b1 authored by Armin Rauschenberger's avatar Armin Rauschenberger
Browse files

vignette

parent e5ae8bab
...@@ -489,10 +489,12 @@ print.joinet <- function(x,...){ ...@@ -489,10 +489,12 @@ print.joinet <- function(x,...){
#' and the intercept-only models (\code{none}). #' and the intercept-only models (\code{none}).
#' #'
#' @examples #' @examples
#' if(!grepl('SunOS',Sys.info()['sysname'])){
#' n <- 50; p <- 100; q <- 3 #' n <- 50; p <- 100; q <- 3
#' X <- matrix(rnorm(n*p),nrow=n,ncol=p) #' X <- matrix(rnorm(n*p),nrow=n,ncol=p)
#' Y <- replicate(n=q,expr=rnorm(n=n,mean=rowSums(X[,1:5]))) #' Y <- replicate(n=q,expr=rnorm(n=n,mean=rowSums(X[,1:5])))
#' cv.joinet(Y=Y,X=X) #' cv.joinet(Y=Y,X=X)
#' }
#' #'
#' \dontrun{ #' \dontrun{
#' # correlated features #' # correlated features
......
...@@ -4,5 +4,5 @@ pkgdown_sha: ~ ...@@ -4,5 +4,5 @@ pkgdown_sha: ~
articles: articles:
article: article.html article: article.html
joinet: joinet.html joinet: joinet.html
last_built: 2020-11-02T13:19Z last_built: 2020-11-02T13:48Z
...@@ -87,10 +87,12 @@ and the intercept-only models (\code{none}). ...@@ -87,10 +87,12 @@ and the intercept-only models (\code{none}).
Compares univariate and multivariate regression. Compares univariate and multivariate regression.
} }
\examples{ \examples{
if(!grepl('SunOS',Sys.info()['sysname'])){
n <- 50; p <- 100; q <- 3 n <- 50; p <- 100; q <- 3
X <- matrix(rnorm(n*p),nrow=n,ncol=p) X <- matrix(rnorm(n*p),nrow=n,ncol=p)
Y <- replicate(n=q,expr=rnorm(n=n,mean=rowSums(X[,1:5]))) Y <- replicate(n=q,expr=rnorm(n=n,mean=rowSums(X[,1:5])))
cv.joinet(Y=Y,X=X) cv.joinet(Y=Y,X=X)
}
\dontrun{ \dontrun{
# correlated features # correlated features
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment