R Under development (unstable) (2023-10-22 r85388 ucrt) -- "Unsuffered Consequences"
Copyright (C) 2023 The R Foundation for Statistical Computing
Platform: x86_64-w64-mingw32/x64

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> # HEADER ####################################################
> # This is file spam/tests/demo_jss10-figures-table.R.       #
> # It is part of the R package spam,                         #
> #  --> https://CRAN.R-project.org/package=spam              #
> #  --> https://CRAN.R-project.org/package=spam64            #
> #  --> https://git.math.uzh.ch/reinhard.furrer/spam         #
> # by Reinhard Furrer [aut, cre], Florian Gerber [aut],      #
> #    Roman Flury [aut], Daniel Gerber [ctb],                #
> #    Kaspar Moesinger [ctb]                                 #
> # HEADER END ################################################
> 
> 
> # This demo contains the R code to construct the figures and the table of the
> # article:
> #     "spam: A Sparse Matrix R Package with Emphasis on
> #            MCMC Methods for Gaussian Markov Random Fields"
> # submitted to JSS.
> 
> 
> # The code presented here differs in the following points form the actually used
> # one:
> # - Very large grid sizes or very high order neighbor structures are not included
> #   here;
> # - Instead of (100+1) factorizations only (10+1) are performed here;
> # - No figure fine-tuning is done here.
> # - We had a few additional gc(), just to be sure.
> 
> 
> 
> # The following are tests specific. Not all computers run with profiling. Instead
> # of commenting, we define dummies.
> options( echo=FALSE)
Spam version 2.10-0 (2023-10-23) is loaded.
Type 'help( Spam)' or 'demo( spam)' for a short introduction 
and overview of this package.
Help for individual functions is also obtained by adding the
suffix '.spam' to the function name, e.g. 'help( chol.spam)'.
[1] 3 5 1 2 4
[1] 1 2 3 3 3
[1] 1 2 3 6
 [1] 1.0000000 0.5000000 0.8660254 0.5773503 0.8164966 0.6123724 0.6123724
 [8] 0.7905694 0.1581139 0.7745967
[1] 1 2 2 3 3 4 5
[1] 1 3 5 8
[1]  1  3  5  8 10 11
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
NULL
> 
> proc.time()
   user  system elapsed 
   5.78    0.78    6.56