# NOT RUN {
f <- system.file("extdata", "optima.log", package="COMBIA")
fileDF <- readFile(filename = f, separator = "\t", noofrows_skip=0,
platetype="384")
Generatedbarcode <- extractKey(keyposition = 2, rawdata = fileDF,
numberofrowsperplate = 17,
doubleplateexperiment = TRUE)
# }
Run the code above in your browser using DataLab