# NOT RUN {
# Load FracKrigingR library
library(FracKrigingR)
# generate Coordinates
p=2; K=10;
X<-matrix(0,ncol=p, nrow=K)
for(j in 1:p){
for(i in 1:K){
X[i,j] = rnorm(1, 0, 1)
}
}
# generate fractional Brownian vector field
H = 0.5; m = 3
FracField(K,m,H,X)
# }
Run the code above in your browser using DataLab