# NOT RUN {
data <- data.frame(TIME = 0, AMT = 5, II = 24, addl = 2, WT = 80)
lctran(data)
data <- data.frame(TIME = 0, AMT = 5, II = 24, addl = 2, wt = 80)
uctran(data)
# warning
data <- data.frame(TIME = 1, time = 2, CMT = 5)
lctran(data)
# }
Run the code above in your browser using DataLab