set.seed(0)
x <- seq(0,10,length=100)
f <- RFsimulate(model=RMgauss(), x=x, n=3)
str(f)
str(RFspDataFrame2conventional(f))
coordinates(f)[1:25,]
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