Nothing
Code
res
Output
$data
anl <- ANL %>% droplevels()
$graph
{
plot <- h_g_ipp(df = anl, xvar = "AVISIT", yvar = "AVAL",
xlab = "Visit", ylab = "e (d)", title = "Individual Patient Plot for e Values (d) over Time",
subtitle = "a, b, c", id_var = "USUBJID", add_baseline_hline = FALSE,
yvar_baseline = "BASE")
grid::grid.newpage()
grid::grid.draw(plot)
}
Code
res
Output
$data
anl <- adlb %>% droplevels()
$graph
{
plot <- h_g_ipp(df = anl, xvar = "AVISIT", yvar = "AVAL",
xlab = "Visit", ylab = "e (d)", title = "Individual Patient Plot for e Values (d) over Time",
subtitle = "a, b, c", id_var = "SUBJID", add_baseline_hline = TRUE,
yvar_baseline = "BASE")
plot <- plot + ggplot2::facet_grid(rows = ggplot2::vars(SUBJID))
grid::grid.newpage()
grid::grid.draw(plot)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.