SET_MCMC timings

r-spatial · Jul 12, 2023 · d038b86 · d038b86
1 parent dd442eb
commit d038b86
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/man/SET_MCMC.Rd b/man/SET_MCMC.Rd
@@ -109,15 +109,15 @@ neighbours, if FALSE (default) assign NA}
 #require("spdep", quietly=TRUE)
 data(oldcol, package="spdep")
 lw <- spdep::nb2listw(COL.nb, style="W")
-ev <- eigenw(lw)
-W <- as(lw, "CsparseMatrix")
-trMatc <- trW(W, type="mult")
 require("coda", quietly=TRUE)
 set.seed(1)
 COL.err.Bayes <- spBreg_err(CRIME ~ INC + HOVAL, data=COL.OLD, listw=lw)
 print(summary(COL.err.Bayes))
 print(raftery.diag(COL.err.Bayes, r=0.01))
 \dontrun{
+ev <- eigenw(lw)
+W <- as(lw, "CsparseMatrix")
+trMatc <- trW(W, type="mult")
 set.seed(1)
 COL.err.Bayes <- spBreg_err(CRIME ~ INC + HOVAL, data=COL.OLD, listw=lw,
  control=list(prior=list(lambdaMH=TRUE)))