review_data <- map_df(1:5, function(page_number): grabs and combines data from 1-5

scrape_reviews() : finds and reviews data to a list

base_url: provides anchor url to pull data

map_df(): merges data