This is a simple plotly plot for the Data Science in R specialization on Coursera.
library(plotly)
library(tidyverse)
raw <- read_csv("ann_arbor_air_quality_hourly.csv")
filtered <- raw %>% filter(year(timestamp_hour_start)>2025)
plot_ly(filtered, x=filtered$pm1_raw, y=filtered$pm10_raw, mode='markers')