View source: R/class_design_set.R
plot.TrialDesignSet | R Documentation |
Plots a trial design set.
## S3 method for class 'TrialDesignSet'
plot(
x,
y,
...,
type = 1L,
main = NA_character_,
xlab = NA_character_,
ylab = NA_character_,
palette = "Set1",
theta = seq(-1, 1, 0.02),
nMax = NA_integer_,
plotPointsEnabled = NA,
legendPosition = NA_integer_,
showSource = FALSE,
grid = 1,
plotSettings = NULL
)
x |
The trial design set, obtained from |
y |
Not available for this kind of plot (is only defined to be compatible to the generic plot function). |
... |
Optional plot arguments. At the moment |
type |
The plot type (default =
|
main |
The main title. |
xlab |
The x-axis label. |
ylab |
The y-axis label. |
palette |
The palette, default is |
theta |
A vector of standardized effect sizes (theta values), default is a sequence from -1 to 1. |
nMax |
The maximum sample size. Must be a positive integer of length 1. |
plotPointsEnabled |
Logical. If |
legendPosition |
The position of the legend.
By default (
|
showSource |
Logical. If
Note: no plot object will be returned if |
grid |
An integer value specifying the output of multiple plots.
By default ( |
plotSettings |
An object of class |
Generic function to plot a trial design set. Is, e.g., useful to compare different designs or design parameters visual.
Returns a ggplot2
object.
## Not run:
design <- getDesignInverseNormal(
kMax = 3, alpha = 0.025,
typeOfDesign = "asKD", gammaA = 2,
informationRates = c(0.2, 0.7, 1), typeBetaSpending = "bsOF"
)
# Create a set of designs based on the master design defined above
# and varied parameter 'gammaA'
designSet <- getDesignSet(design = design, gammaA = 4)
if (require(ggplot2)) plot(designSet, type = 1, legendPosition = 6)
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.