test_that("encontrar_pior_ano_time funciona", {
expect_equal(encontrar_pior_ano_time("Flamengo"),
dplyr::tibble(temporada=2010,
time="Flamengo",
n_vitorias=9))
expect_type(encontrar_pior_ano_time("Flamengo"),"list")
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.