Fch {dfped} | R Documentation |
Paediatric bioavailability according to age.
Description
Bioavailability of a child according to his/her age.
Usage
Fch(age, fabs, Eg, Eh, percCYPg, percCYPh)
Arguments
age |
The age of children. |
fabs |
Coefficient of the absorption. |
Eg |
Coefficient of intestinal extraction. |
Eh |
Coefficient of hepatic extraction. |
percCYPg |
Vector giving the percentage of the molecule metabolised for each cytochrome in the guts in adults. Dataframe with two column - column 1: CYP name, column 2: percentage of the molecule metabolised. |
percCYPh |
Vector giving the percentage of the molecule metabolised for each cytochrome in the liver in adults. Dataframe with two column - column 1: CYP name, column 2: percentage of the molecule metabolised. |
Author(s)
Artemis Toumazi artemis.toumazi@gmail.com, Caroline Petit caroline.petit@crc.jussieu.fr, Sarah Zohar sarah.zohar@inserm.fr
References
Petit, C., et al, (2016) Unified approach for extrapolation and bridging of adult information in early phase dose-finding paediatric studies, Statistical Methods in Medical Research, <doi:10.1177/0962280216671348>.
Johnson T., Rostami-Hodjegan A. and Tucker G. (2006) Prediction of clearance of eleven drugs and associated variability in neonates, infants and children, Clin. Pharmacokinet., 45:931-956.
See Also
Examples
## Not run:
########
# Note: For this example we are using a paediatric database that we have including data of
# children from 0 to 19 years old.
########
children <- read.csv("/Users/artemistoumazi/paediatric_data_p3m/children_0_19.csv")
AGE <- children$Age
F_ad <- 0.6
Eg <- 0
Eh <- 0.058
f_abs <- F_ad/((1 - Eh)*(1-Eg))
perc_CYPg <- data.frame("CYP3A4_5" = 1)
perc_CYPh <- data.frame("CYP3A4_5" = 0.7, "CYP1A2" = 0.3)
Fch(AGE, f_abs, Eg, Eh, perc_CYPg, perc_CYPh)
## End(Not run)