# This is the recommended set up for flipbooks
# you might think about setting cache to TRUE as you gain practice --- building flipbooks from scratch can be time consuming
knitr::opts_chunk$set(fig.width = 6, message = FALSE, warning = FALSE, comment = "", cache = F)
library(flipbookr)
library(tidyverse)

datasets::mtcars %>% 
  as_tibble()

r chunk_reveal("mtcars_data")


Using {SLOWggplot}


mtcars %>%
  ggplot() + #BREAK
  aes(x = disp) +
  aes(y = mpg) + #BREAK
  geom_point(position = "jitter") + #BREAK
  aes(colour = as_factor(cyl))

r chunk_reveal("mtcars_plot", break_type = "user")


Break types

There are a number of break types that help you customize the flipbook


mtcars %>%
  ggplot() + 
  aes(x = disp) +
  aes(y = mpg) + 
  geom_point(
    size = 3,
    alpha = 0.5, 
    colour = "blue") +   
  aes(shape = as_factor(cyl)) +
  ggtitle("An example plot using the infamous mtcars")

r chunk_reveal("mtcars_non_seq")


```{css, eval = TRUE, echo = FALSE} .remark-code{line-height: 1.5; font-size: 80%}

@media print { .has-continuation { display: block; } }

code.r.hljs.remark-code{ position: relative; overflow-x: hidden; }

code.r.hljs.remark-code:hover{ overflow-x:visible; width: 500px; border-style: solid; } ```


Notes:



DataScienceILC/tlsc-dsfb26v-20_workflows documentation built on July 4, 2025, 5:49 a.m.