Line plot(s) displaying trend in patients' parameter values over time is rendered. Patients' individual baseline values can be added to the plot(s) as reference.
g_ipp(
df,
xvar,
yvar,
xlab,
ylab,
id_var = "USUBJID",
title = "Individual Patient Plots",
subtitle = "",
caption = NULL,
add_baseline_hline = FALSE,
yvar_baseline = "BASE",
ggtheme = nestcolor::theme_nest(),
plotting_choices = c("all_in_one", "split_by_max_obs", "separate_by_obs"),
max_obs_per_plot = 4,
col = NULL
)(data.frame)
data set containing all analysis variables.
(string)
time point variable to be plotted on x-axis.
(string)
continuous analysis variable to be plotted on y-axis.
(string)
plot label for x-axis.
(string)
plot label for y-axis.
(string)
variable used as patient identifier.
(string)
title for plot.
(string)
subtitle for plot.
(string)
optional caption below the plot.
(flag)
adds horizontal line at baseline y-value on
plot when TRUE.
(string)
variable with baseline values only.
Ignored when add_baseline_hline is FALSE.
(theme)
optional graphical theme function as provided
by ggplot2 to control outlook of plot. Use ggplot2::theme() to tweak the display.
(string)
specifies options for displaying
plots. Must be one of "all_in_one", "split_by_max_obs", or "separate_by_obs".
(integer(1))
number of observations to be plotted on one
plot. Ignored if plotting_choices is not "separate_by_obs".
(character)
line colors.
A ggplot object or a list of ggplot objects.
g_ipp(): Plotting function for individual patient plots which, depending on user
preference, renders a single graphic or compiles a list of graphics that show trends in individual's parameter
values over time.
Relevant helper function h_g_ipp().
library(dplyr)
# Select a small sample of data to plot.
adlb <- tern_ex_adlb %>%
filter(PARAMCD == "ALT", !(AVISIT %in% c("SCREENING", "BASELINE"))) %>%
slice(1:36)
plot_list <- g_ipp(
df = adlb,
xvar = "AVISIT",
yvar = "AVAL",
xlab = "Visit",
ylab = "SGOT/ALT (U/L)",
title = "Individual Patient Plots",
add_baseline_hline = TRUE,
plotting_choices = "split_by_max_obs",
max_obs_per_plot = 5
)
plot_list
#> [[1]]
#>
#> [[2]]
#>