Remove source de urls dentro da vinheta.

inst/doc/v01_poisson.R

@@ -73,11 +73,6 @@ colnames(aux)[1] <- "fit"
 pred <- cbind(pred, exp(aux))
 str(pred)
 
-urls <-
-    paste0("https://raw.githubusercontent.com/walmes/wzRfun/master/R/",
-           c("prepanel.cbH.R", "panel.cbH.R"))
-sapply(urls, source)
-
 xyplot(fit ~ K | umid, data = pred,
        layout = c(NA, 1), as.table = TRUE,
        ylab = "Número de vagens por vaso",
@@ -90,11 +85,6 @@ xyplot(fit ~ K | umid, data = pred,
 #-----------------------------------------------------------------------
 # Comparações múltiplas.
 
-urls <-
-    paste0("https://raw.githubusercontent.com/walmes/wzRfun/master/R/",
-           c("apc.R"))
-sapply(urls, source)
-
 L <- by(X, INDICES = pred$umid, FUN = as.matrix)
 names(L) <- levels(soja$umid)
 L <- lapply(L, "rownames<-", levels(soja$K))

vignettes/v01_poisson.Rmd

@@ -92,11 +92,6 @@ colnames(aux)[1] <- "fit"
 pred <- cbind(pred, exp(aux))
 str(pred)
 
-urls <-
-    paste0("https://raw.githubusercontent.com/walmes/wzRfun/master/R/",
-           c("prepanel.cbH.R", "panel.cbH.R"))
-sapply(urls, source)
-
 xyplot(fit ~ K | umid, data = pred,
        layout = c(NA, 1), as.table = TRUE,
        ylab = "Número de vagens por vaso",
@@ -109,11 +104,6 @@ xyplot(fit ~ K | umid, data = pred,
 #-----------------------------------------------------------------------
 # Comparações múltiplas.
 
-urls <-
-    paste0("https://raw.githubusercontent.com/walmes/wzRfun/master/R/",
-           c("apc.R"))
-sapply(urls, source)
-
 L <- by(X, INDICES = pred$umid, FUN = as.matrix)
 names(L) <- levels(soja$umid)
 L <- lapply(L, "rownames<-", levels(soja$K))