test_that("viz_01_poverty_scatterplot works", {
gg <- viz_01_poverty_scatterplot(upwork03::averages)
expect_equal(class(gg), c("gg", "ggplot"))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.