Commit 801ec6f3 authored by Eduardo E. R. Junior's avatar Eduardo E. R. Junior

Remove conteúdo dispensável para compilação rápida

parent 8dd764e0
......@@ -26,7 +26,6 @@ ls("package:MRDCr")
library(lattice)
data(soja)
str(soja)
xtabs(~umid + K, data = soja[-75, ])
......@@ -109,11 +108,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))
......
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