# \donttest{
# MCPMod-based analysis of a dose-finding trial with a
# binary endpoint
# Endpoint type
endpoint_type = "Binary"
# Select the candidate dose-response models and initial values
# of the non-linear model parameters (linear, quadratic, exponential,
# emax, logistic and sigemax)
models = list(linear = NA,
quadratic = -0.5,
exponential = 0.3,
emax = 0.3,
logistic = c(0.5, 0.1),
sigemax = c(0.5, 5))
# One-sided Type I error rate
alpha = 0.025
# Direction of the dose-response relationship
direction = "increasing"
# Model selection criterion
model_selection = "AIC"
# The treatment effect for identifying the target dose
# (this effect is defined relative to the placebo effect)
Delta = 0.3
# Perform an MCPMod-based analysis of the trial's data
# The data set binary is included in the package
results = MCPModAnalysis(endpoint_type = endpoint_type,
models = models,
dose = binary$dose,
resp = binary$resp,
alpha = alpha,
direction = direction,
model_selection = model_selection,
Delta = Delta)
# Simple summary of the MCPMod analysis results
results
# Detailed summary of the MCPMod analysis results (remove tempfile)
AnalysisReport(results,
"MCPMod analysis summary (Binary endpoint)",
tempfile("MCPMod analysis summary (Binary endpoint).docx", fileext=".docx"))
# }
Run the code above in your browser using DataLab