Cut-off embedding is a fast simulation method for stationary,
 isotropic Gaussian random fields on square lattices based on
 the standard 
 In fact, the circulant embedding is called with the cutoff
 hypermodel, see Cutoff halfens the maximum number of
 elements models used to define the covariance function of interest
 (from 10 to 5).
 Here multiplicative models are not allowed (yet).
 
For details see 
 Intrinsic embedding is a fast simulation method for intrinsically stationary,
 isotropic Gaussian random fields on square lattices based on
 the standard 
 Note that the simulated random field is always non-stationary.
 In fact, the circulant embedding is called with the Intrinsic
 hypermodel, see 
 Here multiplicative models are not allowed (yet).
 
For details see 
RPcirculant(phi, boxcox, force, mmin, strategy,
 maxGB, maxmem,  tolIm, tolRe, trials, useprimes, dependent,
 approx_step, approx_maxgrid)RPcutoff(phi, boxcox, force, mmin, strategy,
 maxGB, maxmem, tolIm, tolRe, trials, useprimes, dependent,
 approx_step, approx_maxgrid, diameter, a) 
 
RPintrinsic(phi, boxcox, force, mmin, strategy,
 maxGB, maxmem, tolIm, tolRe, trials, useprimes, dependent,
 approx_step, approx_maxgrid, diameter, rawR)
force=TRUE) after trials number of tCE.mmin determines the initial size of the circulant
   matrix. If CE.mmin=0 the minimal starting size is
   determined automatically according to the
   dimensions of the grid.
   If 0, if the circulant
 matrix has negative eigenvalues then the
 size in each direction is doubled; 
1: the size is
 enhanced only in 
 one direction, namely that one where the covariance function has the
 largest value atmaxmem is set to MAXINT.
 
   Default: 1.tolIm then the eigenvalue is always considered as
   real (independently of the value of force).
   
   Default: 1E-3tolRe and 0 are always considered as
   0 and set 0 (independently of the value of force).   Default: -1E-7
tolRe and
   tolIm are missed then the matrix size is doubled
   according to strategy,
   aFALSE
   the columns of the circulant matrix
   have length $2^k$ for some $k$. Otherwise the algorithm
   tries to find a nicely factorizable number close to the size of the
   given matrix.
   
   Default: TRUEFALSE
 then independent random fields are created. If TRUE
 then at least 4 non-overlapping rectangles are taken out of the
 the expanded grid defined by the circulant matrix.
 These simulations are dependent.
 See NA then approx_step is chosen such that
   approx_maxgrid is nmaxmem.RMmodelCutoff and Intrinsic
RFoptions(seed=0) ## *ANY* simulation will have the random seed 0; set
##                   RFoptions(seed=NA) to make them all random again
model <- RMstable(s=1, alpha=1.8)
x <- seq(-3,3,0.1)
z <- RFsimulate(model=RPcirculant(model), x=x, y=x, n=1)
plot(z)
model <- RMexp(var=10, s=10)
z <- RFsimulate(model=RPcirculant(model), 1:10)
plot(z)
model <- RMfbm(Aniso=diag(c(1,2)), alpha=1.5)
z <- RFsimulate(model, x=1:10, y=1:10)
plot(z)
FinalizeExample()Run the code above in your browser using DataLab