This is a test for my drmdel package. To run it you have to install it from CRAN in advance.
Load the package first.
library(drmdel)
Try the main function drmdel for density ratio modelling of multiple samples.
example(drmdel, package="drmdel")
test