-
Notifications
You must be signed in to change notification settings - Fork 6
/
Copy pathbuild_gs_norm.Rd
130 lines (115 loc) · 5.24 KB
/
build_gs_norm.Rd
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/build_gs_norm.R
\name{build_gs_norm}
\alias{build_gs_norm}
\title{Build a multi-stage group-sequential multi-arm clinical trial for a normally
distributed primary outcome}
\usage{
build_gs_norm(
n10 = 77,
n1 = n10 * (1 + K * ratio),
e = c(2.42, 2.42),
f = c(-2.42, 2.42),
K = 2,
alpha = 0.025,
beta = 0.1,
delta1 = 0.5,
delta0 = 0,
sigma = 1,
ratio = 1,
power = "marginal",
stopping = "simultaneous",
type = "variable",
spacing = (1:length(e))/length(e),
summary = FALSE
)
}
\arguments{
\item{n10}{A \code{\link{numeric}} indicating the chosen value for
\ifelse{html}{\out{<i>n</i><sub>10</sub>}}{\eqn{n_{10}}}, the sample size
required in the control arm in stage one of the trial. Defaults to \code{54}.}
\item{n1}{A \code{\link{numeric}} indicating the chosen value for
\ifelse{html}{\out{<i>n</i><sub>1</sub>}}{\eqn{n_1}}, the total sample size
required in stage one of the trial. Defaults to \code{n10\*(1 + K\*ratio)}.}
\item{e}{A \code{\link{numeric}} \code{\link{vector}} indicating the chosen
value for \ifelse{html}{\out{<b><i>e</i></b>}}{\eqn{\bold{e}}}, the efficacy
(upper) stopping boundaries. Defaults to \code{c(2.42, 2.42)}.}
\item{f}{A \code{\link{numeric}} \code{\link{vector}} indicating the chosen
value for \ifelse{html}{\out{<b><i>f</i></b>}}{\eqn{\bold{f}}}, the futility
(lower) stopping boundaries. Defaults to \code{c(-2.42, 2.42)}.}
\item{K}{A \code{\link{numeric}} indicating the chosen value for
\ifelse{html}{\out{<i>K</i>}}{\eqn{\bold{K}}}, the (initial) number of
experimental treatment arms. Defaults to \code{2}.}
\item{alpha}{A \code{\link{numeric}} indicating the chosen value for
\ifelse{html}{\out{<i>α</i>}}{\eqn{\alpha}}, the significance level
(family-wise error-rate). Defaults to \code{0.025}.}
\item{beta}{A \code{\link{numeric}} indicating the chosen value for
\ifelse{html}{\out{<i>β</i>}}{\eqn{\beta}}, used in the definition of
the desired power. Defaults to \code{0.1}.}
\item{delta1}{A \code{\link{numeric}} indicating the chosen value for
\ifelse{html}{\out{<i>δ</i><sub>1</sub>}}{\eqn{\delta_1}}, the
'interesting' treatment effect. Defaults to \code{0.5}.}
\item{delta0}{A \code{\link{numeric}} indicating the chosen value for
\ifelse{html}{\out{<i>δ</i><sub>0</sub>}}{\eqn{\delta_0}}, the
'uninteresting' treatment effect. Defaults to \code{0}.}
\item{sigma}{A \code{\link{numeric}} \code{\link{vector}} indicating the
chosen values for
\ifelse{html}{\out{<i>σ</i><sub>0</sub>}}{\eqn{\sigma_0}} and
\ifelse{html}{\out{<i>σ</i><sub>1</sub>}}{\eqn{\sigma_1}}, the standard
deviations of the responses in the control and experimental arms. Must be of
\code{\link{length}} 1 or 2. If of \code{\link{length}} 1, it is assumed that
\ifelse{html}{\out{<i>σ</i><sub>0</sub>
=<i>σ</i><sub>1</sub>}}{\eqn{\sigma_0=\sigma_1}}.
Defaults to \code{1}.}
\item{ratio}{A \code{\link{numeric}} indicating the chosen value for
\ifelse{html}{\out{<i>r</i>}}{\eqn{r}}, the stage-wise allocation ratio to
present experimental arms. Defaults to \code{1}.}
\item{power}{A \code{\link{character}} string indicating the chosen type of
power to design the trial for. Can be \code{"disjunctive"} or
\code{"marginal"}. Defaults to \code{"marginal"}.}
\item{stopping}{A \code{\link{character}} string indicating the chosen type
of stopping rule. Can be \code{"separate"} or \code{"simultaneous"}. Defaults
to \code{"simultaneous"}.}
\item{type}{A \code{\link{character}} string indicating the choice for the
stage-wise sample size. Can be \code{"variable"} or \code{"fixed"}. Defaults
to \code{"variable"}.}
\item{spacing}{A \code{\link{numeric}} \code{\link{vector}} indicating the
chosen spacing of the interim analyses in terms of the proportion of the
maximal possible sample size. It must contain strictly increasing values,
with final element equal to \code{1}. Defaults to
\code{(1:length(e))/length(e)} (i.e., to equally spaced analyses).}
\item{summary}{A \code{\link{logical}} variable indicating whether a summary
of the function's progress should be printed to the console. Defaults to
\code{FALSE}.}
}
\value{
A \code{\link{list}}, with additional class
\code{"multiarm_des_gs_norm"}, containing the following elements:
\itemize{
\item A \code{\link{tibble}} in the slot \code{$opchar} summarising the
operating characteristics of the identified design.
\item A \code{\link{tibble}} in the slot \code{$pmf_N} summarising the
probability mass function of the random required sample size under key
scenarios.
\item A \code{\link{numeric}} in the slot \code{$maxN} specifying
\ifelse{html}{\out{max <i>N</i>}}{max \eqn{N}}, the trial's maximum required
sample size.
\item A \code{\link{numeric}} in the slot \code{$n_factor}, for internal use
in other functions.
\item Each of the input variables.
}
}
\description{
\code{build_gs_norm()} builds a multi-stage group-sequential multi-arm
clinical trial design object assuming the primary outcome variable is
normally distributed, like those returned by \code{\link{des_gs_norm}}.
}
\examples{
# The design for the default parameters
des <- build_gs_norm()
}
\seealso{
\code{\link{des_gs_norm}}, \code{\link{gui}},
\code{\link{opchar_gs_norm}}, \code{\link{plot.multiarm_des_gs_norm}},
\code{\link{sim_gs_norm}}.
}