finalstate | R Documentation |
Get the final state or time of a PK profile.
finalstate(x)
finaltime(x)
x |
A object of class |
A numeric
vector containing the state of each compartment at
the final observation time (finalstate
), or the final observation
time itself (finaltime
).
pkprofile
for generating a PK profile.
pkprofile.pkprofile
for appending to an existing PK profile.
# Administer a dose at time 0 and a second dose using the final state
# from the first dose (at 12h) as the initial state for the second dose.
t.obs <- seq(0, 12, 0.1)
y <- pkprofile(t.obs, cl=0.25, vc=5, ka=1, dose=list(t.dose=0, amt=1))
finalstate(y)
y2 <- pkprofile(t.obs, cl=0.25, vc=5, ka=1, dose=list(t.dose=0, amt=1), initstate=finalstate(y))
plot(y, xlim=c(0, 24), ylim=c(0, max(y2)), col="blue") # First dose
lines(t.obs+12, y2, col="red") # Second dose
# Add a vertical line to show where the first profile ends.
abline(v=finaltime(y), col="gray75", lty=2)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.