s <- seq(from = 0, to = 20, length.out = 11)
t <- seq(from = 0, to = 20, length.out = 5)
n.obs <- 10
obs.loc <- data.frame(x = max(s)*runif(n.obs),
t = max(t)*runif(n.obs))
A <- rSPDE.Ast(space_loc = s,time_loc = t,
obs.s = obs.loc$x, obs.t = obs.loc$t)
Run the code above in your browser using DataLab