4/22/22, 2:48 PMAct 21 Putting it together1261/Act 21 putting it together.nb.html1/13Act 21 Putting it togetherAdalene Carter4/18/21library(ggplot2)library(ggthemes)library(dplyr)library(maps)library(readr)world_beer_export_import <- read_csv("/Users/adalenecarter/Library/Mobile Documents/com~apple~CloudDocs/Downloads/world-beer-export-import.csv")Rows: 166 Columns: 6──Column specification─────────────────────────Delimiter: ","chr (2): country, regiondbl (4): gross_import, import_share, gross_ex...ℹUse `spec()` to retrieve the full column specification for this data.ℹSpecify the column types or set `show_col_types = FALSE` to quiet this message.library(readr)brewery_year <- read_csv("/Users/adalenecarter/Library/Mobile Documents/com~apple~CloudDocs/Downloads/brewery-year.csv")Rows: 134 Columns: 5──Column specification─────────────────────────Delimiter: ","dbl (5): year, breweries, regional, micro, br...ℹUse `spec()` to retrieve the full column specification for this data.ℹSpecify the column types or set `show_col_types = FALSE` to quiet this message.library(readr)breweries_capita <- read_csv("/Users/adalenecarter/Downloads/breweries-capita.csv")CodeHideHideHideHide