pmx_settings: Create controller global settings

Description Usage Arguments Value Examples

View source: R/pmxClass.R

Description

Create controller global settings

Usage

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
pmx_settings(
  is.draft = TRUE,
  use.abbrev = TRUE,
  color.scales = NULL,
  cats.labels = NULL,
  use.labels = FALSE,
  use.titles = TRUE,
  effects = NULL,
  ...
)

Arguments

is.draft

logical if FALSE any plot is without draft annotation

use.abbrev

logical if FALSE use full description from abbreviation mapping for axis names

color.scales

list list containing elements of scale_color_manual

cats.labels

list list of named vectors for each factor

use.labels

logical if TRUE replace factor named by cats.labels

use.titles

logical FALSE to generate plots without titles

effects

list list of effects levels and labels

...

extra parameter not used yet

Value

pmxSettingsClass object

Examples

 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
library(ggPMX)
library(ggplot2)
ctr <- theophylline(
  settings=
    pmx_settings(
      color.scales=list(
        "Study",
        labels=c("Study 1","Study 2"),
        values=c("1"="lightyellow","2"="lightblue")),
      cats.labels=list(
        SEX=c("0"="M","1"="F"),
        STUD=c("1"="Study 1","2"="Study 2")
      ),
      use.abbrev=TRUE,
      is.draft=TRUE,
      use.labels=TRUE
    )
)



ctr %>% 
  pmx_plot_npde_time(strat.color="STUD",strat.facet=~SEX)
# 
# 
ctr  %>%
  pmx_plot_eta_box(strat.color="STUD", strat.facet =~SEX)

ctr  %>%  pmx_plot_eta_hist

ggPMX documentation built on May 29, 2021, 5:06 p.m.