R/aaa.R

Defines functions `%||%`

# Standard gtable layout
TABLE_ROWS <- 18
TABLE_COLS <- 15
PANEL_ROW <- 10
PANEL_COL <- 8
PLOT_TOP <- 7
PLOT_BOTTOM <- 13
PLOT_LEFT <- 5
PLOT_RIGHT <- 11
TITLE_ROW <- 3
SUBTITLE_ROW <- 4
CAPTION_ROW <- 16

GUIDE_RIGHT <- 13
GUIDE_LEFT <- 3
GUIDE_TOP <- 5
GUIDE_BOTTOM <- 15

`%||%` <- function(x, y) if (is.null(x)) y else x
nmutai/patchwork documentation built on Dec. 31, 2020, 12:08 a.m.