automation

R/functions.R

@@ -539,7 +539,8 @@ print.starnet <- function(x,...){
 #' y <- rnorm(n=n,mean=rowSums(X[,1:20]))
 #' \dontshow{
 #' loss <- cv.starnet(y=y,X=X,nfolds.ext=2,nfolds.int=3)}
-#' #loss <- cv.starnet(y=y,X=X)
+#' \donttest{
+#' loss <- cv.starnet(y=y,X=X)}
 #' 
 cv.starnet <- function(y,X,family="gaussian",nalpha=21,alpha=NULL,nfolds.ext=10,nfolds.int=10,foldid.ext=NULL,foldid.int=NULL,type.measure="deviance",alpha.meta=1,nzero=NULL,intercept=NULL,upper.limit=NULL,unit.sum=NULL,...){
   

cran-comments.md

 
-Thanks for checking the package.
-
+Thanks for the explanation. As requested, we replaced dontrun not by a hashtag but by donttest.
\ No newline at end of file
-- removed dontrun
-- added value tags
\ No newline at end of file

docs/articles/script.html

@@ -82,7 +82,7 @@
       <h1 data-toc-skip>Stacked Elastic Net</h1>
                         <h4 class="author">Armin Rauschenberger</h4>
             
-            <h4 class="date">26 May 2020</h4>
+            <h4 class="date">03 June 2020</h4>
       
       <small class="dont-index">Source: <a href="https://github.com/rauschenberger/starnet/blob/master/vignettes/script.Rmd"><code>vignettes/script.Rmd</code></a></small>
       <div class="hidden name"><code>script.Rmd</code></div>

docs/pkgdown.yml

@@ -5,5 +5,5 @@ articles:
   article: article.html
   script: script.html
   starnet: starnet.html
-last_built: 2020-05-26T12:41Z
+last_built: 2020-06-03T06:38Z
 

docs/reference/cv.starnet.html

@@ -256,8 +256,8 @@ with the maximum number of non-zero coefficients shown in the column name.</p>
 <span class='no'>X</span> <span class='kw'>&lt;-</span> <span class='fu'><a href='https://rdrr.io/r/base/matrix.html'>matrix</a></span>(<span class='fu'><a href='https://rdrr.io/r/stats/Normal.html'>rnorm</a></span>(<span class='no'>n</span>*<span class='no'>p</span>),<span class='kw'>nrow</span><span class='kw'>=</span><span class='no'>n</span>,<span class='kw'>ncol</span><span class='kw'>=</span><span class='no'>p</span>)
 <span class='no'>y</span> <span class='kw'>&lt;-</span> <span class='fu'><a href='https://rdrr.io/r/stats/Normal.html'>rnorm</a></span>(<span class='kw'>n</span><span class='kw'>=</span><span class='no'>n</span>,<span class='kw'>mean</span><span class='kw'>=</span><span class='fu'><a href='https://rdrr.io/r/base/colSums.html'>rowSums</a></span>(<span class='no'>X</span>[,<span class='fl'>1</span>:<span class='fl'>20</span>]))
 <span class='co'># \dontshow{</span>
-<span class='no'>loss</span> <span class='kw'>&lt;-</span> <span class='fu'>cv.starnet</span>(<span class='kw'>y</span><span class='kw'>=</span><span class='no'>y</span>,<span class='kw'>X</span><span class='kw'>=</span><span class='no'>X</span>,<span class='kw'>nfolds.ext</span><span class='kw'>=</span><span class='fl'>2</span>,<span class='kw'>nfolds.int</span><span class='kw'>=</span><span class='fl'>3</span>)<span class='co'># }</span></div><div class='img'><img src='cv.starnet-1.png' alt='' width='700' height='433' /></div><div class='input'>#loss &lt;- cv.starnet(y=y,X=X)
-
+<span class='no'>loss</span> <span class='kw'>&lt;-</span> <span class='fu'>cv.starnet</span>(<span class='kw'>y</span><span class='kw'>=</span><span class='no'>y</span>,<span class='kw'>X</span><span class='kw'>=</span><span class='no'>X</span>,<span class='kw'>nfolds.ext</span><span class='kw'>=</span><span class='fl'>2</span>,<span class='kw'>nfolds.int</span><span class='kw'>=</span><span class='fl'>3</span>)<span class='co'># }</span></div><div class='img'><img src='cv.starnet-1.png' alt='' width='700' height='433' /></div><div class='input'><span class='co'># \donttest{</span>
+<span class='no'>loss</span> <span class='kw'>&lt;-</span> <span class='fu'>cv.starnet</span>(<span class='kw'>y</span><span class='kw'>=</span><span class='no'>y</span>,<span class='kw'>X</span><span class='kw'>=</span><span class='no'>X</span>)<span class='co'># }</span></div><div class='img'><img src='cv.starnet-2.png' alt='' width='700' height='433' /></div><div class='input'>
 </div></pre>
   </div>
   <div class="col-md-3 hidden-xs hidden-sm" id="pkgdown-sidebar">

man/cv.starnet.Rd

@@ -104,6 +104,7 @@ X <- matrix(rnorm(n*p),nrow=n,ncol=p)
 y <- rnorm(n=n,mean=rowSums(X[,1:20]))
 \dontshow{
 loss <- cv.starnet(y=y,X=X,nfolds.ext=2,nfolds.int=3)}
-#loss <- cv.starnet(y=y,X=X)
+\donttest{
+loss <- cv.starnet(y=y,X=X)}
 
 }