data(ExampleSpatialVxSet)
x <- ExampleSpatialVxSet$vx
xhat <- ExampleSpatialVxSet$fcst
hold <- FeatureSuitePrep("xhat", "x")
res <- griddedVgram(hold,R=8)
plot(res)
data(pert004)
data(pert000)
hold <- FeatureSuitePrep("pert004","pert000")
res <- griddedVgram(hold, R=8)
plot(res)
Run the code above in your browser using DataLab