Nothing
## ----include=FALSE------------------------------------------------------------
knitr::opts_chunk$set(echo=TRUE,eval=FALSE)
## ----eval=FALSE---------------------------------------------------------------
# install.packages("palasso")
## ----eval=FALSE---------------------------------------------------------------
# #install.packages("devtools")
# library(devtools)
# install_github("rauschenberger/palasso")
## ----message=FALSE------------------------------------------------------------
# library(glmnet)
# library(palasso)
## ----eval=FALSE---------------------------------------------------------------
# attach(toydata)
## ----echo=FALSE---------------------------------------------------------------
# names <- names(toydata)
# for(i in 1:length(names)){
# assign(names[i],toydata[[i]])
# }
# rm(names)
## -----------------------------------------------------------------------------
# object <- glmnet(y=y,x=X[[1]])
# object <- glmnet(y=y,x=X[[2]])
## -----------------------------------------------------------------------------
# object <- palasso(y=y,X=X)
## ----results='hide'-----------------------------------------------------------
# object <- palasso(y=y,X=X,max=10)
## ----results='hide'-----------------------------------------------------------
# weights(object)
## ----results='hide'-----------------------------------------------------------
# fitted(object)
## ----results='hide'-----------------------------------------------------------
# residuals(object)
## ----results='hide'-----------------------------------------------------------
# predict(object,newdata=X)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.