seq_blaisdell_raghavarao: Blaisdell and Raghavarao (1980) cross-over design...
In mjg211/xover: Design and analysis of cross-over clinical trials

Description Usage Arguments Details Value Author(s) References Examples

View source: R/seq_blaisdell_raghavarao.R

Specifies cross-over designs from Blaisdell and Raghavarao (1980).

1 2	seq_blaisdell_raghavarao(D = 6, labels = 0:(D - 1), as_matrix = T, summary = T)

`D`	The number of treatments. Must be either six, eight, or nine. Defaults to `6`.
`labels`	A `vector` of labels for the treatments. Should be of `length` `D`, containing unique elements. Defaults to `0:(D - 1)`.
`as_matrix`	A `logical` variable indicating whether the design should be returned as a `matrix`, or a `tibble`. Defaults to `T`.
`summary`	A `logical` variable indicating whether a summary of the function's progress should be printed to the console. Defaults to `T`.

seq_blaisdell_raghavarao() supports the specification of designs from Blaisdell and Raghavarao (1980). Designs for six, eight, and nine treatments (see D) are supported, for any chosen treatment labels (see labels). In addition, the designs can be returned in matrix or tibble form (see as_matrix).

Precisely, the (k,j)th element of the cross-over design matrix corresponds to the treatment a subject on the kth sequence would receive in the jth period.

Either a matrix if as_matrix = T (with rows corresponding to sequences and columns to periods), or a tibble if as_matrix = F (with rows corresponding to a particular period on a particular sequence). In either case, the returned object will have class xover_seq.

Based on data from the Crossover package by Kornelius Rohmeyer.

Blaisdell EA, Raghavarao D (1980) Partially balanced change-over designs based on m-associate class PBIB designs. J R Stat Soc B 42:334-8.

# Blaisdell and Raghavarao (1980) design for six treatments
blaisdell_raghavarao        <- seq_blaisdell_raghavarao()
# Using different labels
blaisdell_raghavarao_ABCDEF <- seq_blaisdell_raghavarao(labels =
                                                          LETTERS[1:6])
# Returning in tibble form
blaisdell_raghavarao_tibble <- seq_blaisdell_raghavarao(as_matrix = F)