View source: R/add_label_box.R
add_label_box | R Documentation |
In a consort diagram, this can be used to indicate different stage.
add_label_box(
prev_box,
txt,
only_terminal = TRUE,
just = c("center", "left", "right"),
...
)
prev_box |
A completed diagram created with |
txt |
Text in the node. If a character string is provided, the label will be aligned to the last box if a character is provided. If a named vector, the labels will align to corresponding row of the node. And the names is the number indicating row number of box to horizontally align with and value is the text in the box. |
only_terminal |
If the txt is only for the terminal box, default. Otherwise, the side box will also be accounted for. |
just |
The justification for the text: center (default), left or right. |
... |
Other parameters pass to textbox, |
A consort
object.
add_side_box
add_split
textbox
add_box
txt1 <- "Population (n=300)"
txt1_side <- "Excluded (n=15): \n
\u2022 MRI not collected (n=3)\n
\u2022 Tissues not collected (n=4)\n
\u2022 Other (n=8)"
g <- add_box(txt = txt1)
g <- add_side_box(g, txt = txt1_side)
g <- add_box(g, txt = "Randomized (n=200)")
g <- add_split(g, txt = c("Arm A (n=100)", "Arm B (n=100"))
g <- add_side_box(g,
txt = c(
"Excluded (n=15):\n
\u2022 MRI not collected (n=3)\n
\u2022 Tissues not collected (n=4)\n
\u2022 Other (n=8)",
"Excluded (n=15):\n
\u2022 MRI not collected (n=3)\n
\u2022 Tissues not collected (n=4)"
)
)
g <- add_box(g, txt = c("Final analysis (n=100)", "Final analysis (n=100"))
g <- add_label_box(g, txt = c("1" = "Screening", "3" = "Randomized", "4" = "Final analysis"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.