R/ba.fit.R

In charles-plessy/molaR: Calculate molarity using exported BioAnalyzer data.

Defines functions ba.fit

Documented in ba.fit

ba.fit <- function(ladder, sample) {
fit <- with(ladder, lm(Time ~ log(Size)))$coefficients
with(sample, exp( (Time - fit[1]) / fit[2] ))
}