demand_supply |> ggplot(aes(x = K, y = r, color = label)) + geom_line() + annotate( "text", x = 11, y = 0.045, label = "Supply", color = colo…
code/00_download/
code/01_cleaning/