modify.R
In vembedr: Embed Video in HTML

## ----setup, include = FALSE---------------------------------------------------
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)

## -----------------------------------------------------------------------------
library("vembedr")

## -----------------------------------------------------------------------------
embed_youtube("2WoDQBhJCVQ") %>%
  use_start_time("44s") %>%
  use_align("center") %>%
  use_rounded(10)

## -----------------------------------------------------------------------------
embed_youtube(id = "8SGif63VW6E") %>% 
  use_start_time("4m12s")

## -----------------------------------------------------------------------------
embed_vimeo("10022924") %>%
  use_align("center")

## -----------------------------------------------------------------------------
embed_youtube("lan-UQfN0zs") %>%
  use_rounded(radius = 10)

## -----------------------------------------------------------------------------
embed_youtube("FkBQc0gQkQI") %>%
  use_bs_responsive()

## -----------------------------------------------------------------------------
embed_youtube("KvX8MijgeW8", ratio = "4by3") %>%
  use_bs_responsive()