FeatureMatchAnalyzer(x, which.comps=c("cent.dist", "angle.diff", "area.ratio", "int.area",
"bdelta", "haus", "ph", "mhd", "med", "msd", "fom", "minsep",
"bearing"), sizefac=1, alpha=0.1, k=4, p=2, c=Inf,
distfun="distmapfun", ...)## S3 method for class 'matched.centmatch':
FeatureMatchAnalyzer(x, which.comps=c("cent.dist", "angle.diff",
"area.ratio", "int.area", "bdelta", "haus", "ph", "mhd", "med",
"msd", "fom", "minsep", "bearing"), sizefac=1, alpha=0.1, k=4, p=2,
c=Inf, distfun="distmapfun", ...)
## S3 method for class 'matched.deltamm':
FeatureMatchAnalyzer(x, which.comps = c("cent.dist", "angle.diff",
"area.ratio", "int.area", "bdelta", "haus", "ph", "mhd", "med", "msd",
"fom", "minsep", "bearing"), sizefac = 1, alpha = 0.1, k = 4, p = 2,
c = Inf, distfun = "distmapfun", ..., y = NULL, matches = NULL,
object = NULL)
## S3 method for class 'FeatureMatchAnalyzer':
summary(object, ...)
## S3 method for class 'FeatureMatchAnalyzer':
plot(x, ..., type = c("all", "ph", "mhd", "med", "msd",
"fom", "minsep", "cent.dist", "angle.diff", "area.ratio",
"int.area", "bearing", "bdelta", "haus"))
## S3 method for class 'FeatureMatchAnalyzer':
print(x, ...)
FeatureComps(Y, X, which.comps=c("cent.dist", "angle.diff", "area.ratio", "int.area",
"bdelta", "haus", "ph", "mhd", "med", "msd", "fom", "minsep", "bearing"),
sizefac=1, alpha=0.1, k=4, p=2, c=Inf, distfun="distmapfun", deg = TRUE,
aty = "compass", loc = NULL, ...)
## S3 method for class 'FeatureComps':
distill(x, ...)
x, y and matches are list objects with components as output by deltamm or similar function. Only one is used, and it first checks for matches, then y, and finally xsolutionset from package locperf function.which.comps) or plotted (type).locperf.bearing function.deltametric from package summary method function, additional optional arguments may be passed, which include silent (logical, should the information be priprint returns a named vector invisibly.
FeatureMatchAnalyzer operates on objects of class FeatureComps is the primary function called by FeatureMatchAnalyzer, and is designed as a more stand-alone type of function. Several of the measures that can be calculated are simply the binary image measures/metrics available via, e.g., locperf. It calculates comparisons between two matched features (i.e., between the verification and forecast fields).
distill reduces a interester, which is why the order is important.
The summary method function for FeatureMatchAnalyzer allows for passing a function, con, to determine confidence for each interest value. The idea being to set the interest to zero when the particular interest value does not make sense. For example, angle difference makes no sense if both objects are circles. Currently, no functions are included in this package for actually doing this, and so the functionality itself has not been tested.
The print method function for FeatureMatchAnalyzer first converts the object to a simple named matrix, then prints the matrix out. The resulting matrix is returned invisibly.
FeatureFinderFunctions to merge and/or match objects: deltamm, centmatch, MergeForce
Functions to compute feature properties: locperf, deltametric, bearing
Function to calculate fuzzy logic interest values: interester
data(ExampleSpatialVxSet)
x <- ExampleSpatialVxSet$vx
xhat <- ExampleSpatialVxSet$fcst
hold <- make.SpatialVx(x, xhat, field.type="Example",
units="units", data.name=c("Example", "x", "xhat"))
look <- FeatureFinder(hold, smoothpar=1.5)
look2 <- centmatch(look)
tmp <- FeatureMatchAnalyzer(look2)
tmp
summary(tmp)
plot(tmp)
data(pert000)
data(pert004)
data(ICPg240Locs)
hold <- make.SpatialVx(pert000, pert004, loc=ICPg240Locs,
projection=TRUE, map=TRUE, loc.byrow = TRUE,
field.type="Precipitation", units="mm/h",
data.name=c("Perturbed ICP Cases", "pert000", "pert004"))
look <- FeatureFinder(hold, smoothpar=10.5)
look2 <- centmatch(look)
tmp <- FeatureMatchAnalyzer(look2)
summary(tmp)
plot(tmp)Run the code above in your browser using DataLab