ArtPoon / iupmBayes

Bayesian estimation of infectious units per million (IUPM) from viral outgrowth assay-based sequence data
GNU Affero General Public License v3.0
0 stars 0 forks source link

Variant label isn't consistent with Variant Column #4

Closed RouxCil closed 4 years ago

RouxCil commented 4 years ago

Change the parse.data function such that the colnames in the wells matrix is labeled by the Variant column in the data:

wells <- acast(temp2, Well.number~Variant, value.var = "Presence.of.Variant")

Change the mh function to read the colnames from the data structure:

vars <- colnames(data[[1]][[region]][["wells"]]) labels <- c(labels, paste(region, vars, sep='.'))