Skip to main content

Browse the archive

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 
version 1.2.9
1 parent dec8043
Raw File
RFtest.info.R 
# source("RFtest.info.R")

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

str(GetRegisterInfo(0))
cat("-------------------------------------------\n")
try(GaussRF(1:4, grid=TRUE, model="exp", param=c(1,2,3,4)))
str(GetRegisterInfo(0))

try(GaussRF(runif(4), grid=FALSE, model="exp", param=c(1,2,3,4), me="ci"))
str(GetRegisterInfo(0, TRUE))
back to top