# Example data.
data <- DataDual(
x = c(25, 50, 25, 50, 75, 300, 250, 150),
y = c(0, 0, 0, 0, 0, 1, 1, 0),
w = c(0.31, 0.42, 0.59, 0.45, 0.6, 0.7, 0.6, 0.52),
doseGrid = seq(25, 300, 25)
)
# Get the efficacy response and their corresponding dose levels
# categorized by the DLT.
getEff(data)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.