# NOT RUN {
transData <- conc2frac(feed = c(0.200, 0.169, 0.152, 0.141, 0.138),
strip = c(0.000, 0.035, 0.045, 0.062, 0.069),
time = c(0, 2, 4, 6, 8))
print(transData)
# }
Run the code above in your browser using DataLab