ri2rt(riTime, rt.observed, ri.standard)
rt2ri
.
RIcorrect
, FAMEoutliers
# RI standards
standard <- c(100, 200, 300, 400, 500)
# observed standard retention times
observed <- c(10.4, 19.3, 32.4, 40.2, 50.3)
# a random set of retention times
RI <- runif(100,90,600)
# the corrected RIs
RT <- ri2rt(RI, observed, standard)
Run the code above in your browser using DataLab