cosine_pairs: Calculate pairs of cosine similarities between replicates
In Swarchal/phenoDist: Distance Measurements in Phenotypic Screening

Description Usage Arguments Value Examples

Given a list, with an element per compound, cols are the elements of the vector with which to calculate the cosine similarity

1	cosine_pairs(x, cols)

`x`	list
`cols`	integer, column indices

dataframe of compound combinations across replicates with a column of cosine similarity values

cmpds <- c(rep('a', 100), rep('b', 100), rep('c', 100))
replicate <- rep(1:100, 3)
PC1 <- rnorm(300)
PC2 <- rnorm(300)

df <- data.frame(cmpds, replicate, PC1, PC2)

df_split <- split(df, df$cmpds)

# works with unequal replicate sizes
df_split$a <- df_split$a[-c(1:10), ]

cosine_pairs(df_split, 3:4)