MatchSigsAndRelabel: An asymmetrical analysis of a set of "ground truth" and...

In steverozen/ICAMSxtra: ICAMSxtra

Description

This function is deprecated. You probably want to use TP_FP_FN_avg_sim, sig_dist_matrix, or match_two_sig_sets.

Usage

MatchSigsAndRelabel(ex.sigs, gt.sigs, exposure = NULL, similarity.cutoff = 0.9)

Arguments

ex.sigs	Newly extracted signatures to be compared to gt.sigs.
gt.sigs	"Ground truth" signatures.
exposure	If NULL, then match ex.sigs against all signatures in gt.sigs. Otherwise this should be ground-truth exposures used generate the synthetic spectra from which ex.sigs were extracted. In this case we do not match to ground-truth signatures that were not in the ground truth exposure.
similarity.cutoff	A ground-truth signature must have been the best match of an extracted signature with a cosine similarity $ge$ this value to be considered a true positive. Otherwise we consider the ground-truth signature to be a false negative.

Value

A list with the elements

• averCosSim The average of the cosine similarities between each signature in ex.sigs and its closest match in gt.sigs and the closest match between each signature in gt.sigs and its closest match in ex.sigs. This may not be what you want. Often one wants the average of the cosine similarities of the true positives to their matching ground-truth signatures.

• match1 The match from extracted signatures to ground truth signatures. Associated with each extracted signature is a ground truth signature with best cosine similarity. Ties are resolved arbitrarily.

• match2 The match from ground truth signatures to extracted signatures. Associated with each extracted signature is a ground truth signature with best cosine similarity. Ties are resolved arbitrarily.

• extracted.with.no.best.match

• ground.truth.with.no.best.match

• ex.sigs Echo input argument

• gt.sigs Echo input argument

• gt.mean.cos.sim

Examples

gt.sigs <- matrix(c(1, 3,   4, 1, 2, 4), ncol = 2)
ex.sigs <- matrix(c(1, 3.1, 4, 5, 1, 1, 1, 2.8, 4), ncol = 3)
colnames(gt.sigs) <- c("gt.1", "gt.2")
colnames(ex.sigs) <- c("ex.1", "ex.2", "ex.3")
tout <- MatchSigsAndRelabel(gt.sigs = gt.sigs, ex.sigs = ex.sigs)
tout

steverozen/ICAMSxtra documentation built on Feb. 9, 2022, 7:01 a.m.