Revision b2f6358d2679f8a415bd4f01a706fc38b04bc0c5 authored by Martin Schlather on 26 April 2005, 00:00:00 UTC, committed by Gabor Csardi on 26 April 2005, 00:00:00 UTC
1 parent dec8043
Raw File
x.R
# source("x.R")


if (file.exists("source.R")) source("source.R") 

RFparameters(Print=6)

x <- seq(0, 1, 1/24)
model <- list(
              list(model="stable", var=1, scale=1, kappa=2),
              "+",
              list(model="cauchy", var=1, scale=1, kappa=2)
              )
try(z <- GaussRF(x, x, grid=TRUE, gridtriple=FALSE,
        model=model, n=1, exactness=NA, stationary.only=NA))
back to top