Estimation of baseline value
This function tries to estimate the baseline value for RFU data from capillary electrophoresis whith the heuristic that the most common value is the baseline.
baselineabif(rfu, maxrfu = 1000)
rfu |
a numeric vector of signal value |
maxrfu |
signal values greater or equal to maxrfu are forced to NA |
A single numeric value for the estimated baseline.
J.R. Lobry
data(JLO) rfu <- JLO$Data$DATA.1 bl <- baselineabif(rfu) plot(1:length(rfu), rfu, type = "l", xlab = "Time [datapoint units]", ylab = "Signal [RFU]", main = "Example of baseline estimates") abline(h = bl, col="red", lty = 2) legend("topright", inset = 0.02, "Baseline estimate", lty = 2, col = "red")
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.