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