knitr::opts_chunk$set( collapse = TRUE, comment = "#>" )
library(idk) library(dplyr) library(ggplot2)
..
track_information %>% mutate(album_type = as.character(album_type)) %>% filter(album_type != "single") %>% ggplot(aes(instrumentalness , popularity)) + geom_point()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.