convthresh(object, smoothfun = "disk2dsmooth", smoothpar = 1, smoothfunargs = NULL, thresh = 1e-08, idfun = "disjointer", zero.down = FALSE, ...)
salIDfun(object, fac = 0.06666667, q = 0.95, wash.out = NULL, thresh = NULL, idfun = "disjointer", ...)
disjointer(x, method = "C")
FeatureSuitePrep
. Not used by disjointer
(there for compatibility).x
(the field to be smoothed, not the same as the argument to disjointer
) and a smoothing parameter as the first two arguments. Other arguments are allowed, ansmoothfun
.smoothfun
.thresh
is supplied.thresh
is NULL, then this is the quantile used to deterimne the thresholds for the two fields.x
, which is the convolved and thresholded (binary) field.thresh
is NULL.zapsmall
is used to set the very small positive values to zero.connected
from idfun
.This is the method used by Davis et al. (2006a,b).
Davis CA, BG Brown, and RG Bullock, 2006b. Object-based verification of precipitation forecasts, Part II: Application to convective rain systems. Mon. Wea. Rev., 134, 1785--1795.
Wernli, H., M. Paulat, M. Hagen, and C. Frei, 2008. SAL--A novel quality measure for the verification of quantitative precipitation forecasts. Mon. Wea. Rev., 136, 4470--4487.
Wernli, H., C. Hofmann, and M. Zimmer, 2009. Spatial forecast verification methods intercomparison project: Application of the SAL technique. Wea. Forecasting, 24, 1472--1484, DOI: 10.1175/2009WAF2222271.1
connected
, as.im
, tess
, tiles
, owin
, FeatureSuite
, FeatureSuitePrep
x <- y <- matrix(0, 10, 12)
x[2:3,c(3:6, 8:10)] <- 1
y[c(4:7, 9:10),c(7:9, 11:12)] <- 1
hold <- FeatureSuitePrep("y", "x")
look <- convthresh( hold, smoothpar=0.5)
length( look$X.feats) # two objects in x.
length( look$Y.feats) # four ovjects in y.
plot( look$X.feats)
plot( look$Y.feats)
data(pert000)
data(pert004)
hold <- FeatureSuitePrep("pert004", "pert000")
look <- convthresh( hold, smoothpar=3.5)
length(look$X.feats)
length(look$Y.feats)
image.plot(look$sIx)
image.plot(look$sIy)
Run the code above in your browser using DataLab