## ---- echo = FALSE------------------------------------------------------------
library(vembedr)
embed_vimeo("505287449") %>%
  use_align("center")

## ---- echo = FALSE------------------------------------------------------------
library(vembedr)
embed_vimeo("505286442") %>%
  use_align("center")