max_shift: Find the shift with the best correlation

In Swarchal/TISS: Titration Invariant Similarity Score

Description

For a number of correlation meansurements produced by trim_cor will return the shift with the highest correlation value.

Usage

max_shift(cor_measurements, value = FALSE)

Arguments

cor_measurements	vector of correlation values and shift
value	boolean, whether to return a numerical correlation value

Value

max_shift shift with the highest correlation. If value is TRUE then it will also return the correlation value

Examples

# create dummy dataset
l <- list()
for (i in 1:100) l[[i]] <- rnorm(100)
df <- as.data.frame(l)
names(df) <- paste("col", 1:100, sep = "_")
# order values (more obvious correlation shifts)
df <- apply(df, 2, sort)
out <- trim_cor(df[,1], df[,2], n = 5, p = 5)

max_shift(out)
max_shift(out, value = TRUE)

Swarchal/TISS documentation built on May 9, 2019, 3:24 p.m.