RFoptions(seed=0) ## *ANY* simulation will have the random seed 0; set
## RFoptions(seed=NA) to make them all random again
x <- seq(0,10,length=100)
f <- RFsimulate(model=RMgauss(), x=x, n=3)
str(f)
str(RFspDataFrame2conventional(f))
head(coordinates(f))
str(f[2]) ## selects second column of data-slot
all.equal(f, cbind(f,f)[1:3]) ## TRUE
plot(f, nmax=2)
Run the code above in your browser using DataLab