#===> create a space-time window <===#
xcoord <- c(0, 10)
ycoord <- c(0, 20)
tcoord <- c(0, 100)
stw <- stwin(xcoord, ycoord, tcoord)
#===> create a 10 x 10 grid <===#
gf <- make.grid(stw)
#===> create a 10 x 20 grid <===#
gf <- make.grid(stw, c(10, 20))
nrow(gf$grid.full)
ncol(gf$grid.full)
Run the code above in your browser using DataLab