expected_header_sets <- list( cleaned_20160403 = c( "date" , "gross_revenue_usd" , "estimated_monetized_playbacks" , "playback_based_cpm_usd" , "impression_based_cpm_usd" , "views" , "unique_cookies_web_only" , "watch_time_minutes" , "watch_time_hours" , "average_view_duration_minutes" , "average_percentage_viewed" , "subscriber_views" , "subscriber_minutes_watched" , "card_clicks" , "card_impressions" , "card_click_rate" , "card_teaser_clicks" , "card_teaser_impressions" , "card_teaser_click_rate" , "total_estimated_earnings_usd" , "ad_earnings_usd" , "adsense_earnings_usd" , "doubleclick_earnings_usd" , "transaction_earnings_usd" , "transactions" , "earnings_per_transaction_usd" , "verified_ad_impressions" , "clicks" , "clickable_impressions" , "click_through_rate" , "closes" , "closable_impressions" , "close_rate" , "annotations_impressions" , "videos_added" , "likes" , "likes_added" , "likes_removed" , "dislikes" , "dislikes_added" , "dislikes_removed" , "shares" , "comments" , "videos_in_playlists" , "videos_added_to_playlists" , "videos_removed_from_playlists" , "favorites" , "favorites_added" , "favorites_removed" , "youtube_red_earnings_usd" ) , cleaned_20160410 = c( "date" , "gross_revenue_usd" , "estimated_monetized_playbacks" , "playback_based_cpm_usd" , "impression_based_cpm_usd" , "views" , "unique_cookies_web_only" , "watch_time_minutes" , "watch_time_hours" , "average_view_duration" , "average_percentage_viewed" , "subscriber_views" , "subscriber_minutes_watched" , "card_clicks" , "card_impressions" , "card_click_rate" , "card_teaser_clicks" , "card_teaser_impressions" , "card_teaser_click_rate" , "total_estimated_earnings_usd" , "ad_earnings_usd" , "adsense_earnings_usd" , "doubleclick_earnings_usd" , "transaction_earnings_usd" , "transactions" , "earnings_per_transaction_usd" , "verified_ad_impressions" , "clicks" , "clickable_impressions" , "annotation_click_through_rate" , "closes" , "closable_impressions" , "annotation_close_rate" , "annotations_impressions" , "videos_added" , "likes" , "likes_added" , "likes_removed" , "dislikes" , "dislikes_added" , "dislikes_removed" , "shares" , "comments" , "videos_in_playlists" , "videos_added_to_playlists" , "videos_removed_from_playlists" , "favorites" , "favorites_added" , "favorites_removed" , "youtube_red_earnings_usd" ) , cleaned_20160424 = c( "date" , "gross_revenue_usd" , "estimated_monetized_playbacks" , "playback_based_cpm_usd" , "impression_based_cpm_usd" , "views" , "unique_cookies_web_only" , "watch_time_minutes" , "watch_time_hours" , "average_view_duration" , "average_percentage_viewed" , "subscriber_views" , "subscriber_minutes_watched" , "card_clicks" , "card_impressions" , "card_click_rate" , "card_teaser_clicks" , "card_teaser_impressions" , "card_teaser_click_rate" , "total_estimated_earnings_usd" , "ad_earnings_usd" , "adsense_earnings_usd" , "doubleclick_earnings_usd" , "transaction_earnings_usd" , "transactions" , "earnings_per_transaction_usd" , "ad_impressions_usd" , "clicks" , "clickable_impressions" , "annotation_click_through_rate" , "closes" , "closable_impressions" , "annotation_close_rate" , "annotations_impressions" , "videos_added" , "likes" , "likes_added" , "likes_removed" , "dislikes" , "dislikes_added" , "dislikes_removed" , "shares" , "comments" , "videos_in_playlists" , "videos_added_to_playlists" , "videos_removed_from_playlists" , "favorites" , "favorites_added" , "favorites_removed" , "youtube_red_earnings_usd" ) , cleaned_but_no_dict_changes = c( "date" , "youtube_ad_revenue_usd" , "estimated_monetized_playbacks" , "playback_based_cpm_usd" , "cpm_usd" , "views" , "unique_cookies_web_only" , "watch_time_minutes" , "watch_time_hours" , "average_view_duration" , "average_percentage_viewed" , "subscriber_views" , "subscriber_minutes_watched" , "card_clicks" , "cards_shown" , "clicks_per_card_shown" , "card_teaser_clicks" , "card_teasers_shown" , "clicks_per_card_teaser_shown" , "estimated_partner_revenue_usd" , "estimated_partner_ad_revenue_usd" , "estimated_partner_adsense_revenue_usd" , "estimated_partner_doubleclick_revenue_usd" , "partner_transaction_revenue_usd" , "transactions" , "partner_revenue_per_transaction_usd" , "ad_impressions_usd" , "youtube_red_watch_time_minutes" , "youtube_red_views" , "youtube_red_partner_revenue_usd" , "youtube_red_watch_time_hours" , "annotation_clicks" , "clickable_annotations_shown" , "annotation_click_through_rate" , "annotation_closes" , "closable_annotations_shown" , "annotation_close_rate" , "annotations_shown" , "videos_added" , "likes" , "likes_added" , "likes_removed" , "dislikes" , "dislikes_added" , "dislikes_removed" , "shares" , "comments" , "videos_in_playlists" , "videos_added_to_playlists" , "videos_removed_from_playlists" ) , uncleaned_older = c( "Date" , "Gross revenue (USD)" , "Estimated monetized playbacks" , "Playback-based CPM (USD)" , "Impression-based CPM (USD)" , "Views" , "Unique cookies (web only)" , "Watch time (minutes)" , "Watch time (hours)" , "Average view duration (minutes)" , "Average percentage viewed" , "Subscriber views" , "Subscriber minutes watched" , "Card clicks" , "Card impressions" , "Card click rate" , "Card teaser clicks" , "Card teaser impressions" , "Card teaser click rate" , "Total estimated earnings (USD)" , "YouTube Red earnings (USD)" , "Ad earnings (USD)" , "AdSense earnings (USD)" , "DoubleClick earnings (USD)" , "Transaction earnings (USD)" , "Transactions" , "Earnings per transaction (USD)" , "Impressions" , "Clicks" , "Clickable impressions" , "Click through rate" , "Closes" , "Closable impressions" , "Close rate" , "Impressions" , "Likes" , "Likes added" , "Likes removed" , "Dislikes" , "Dislikes added" , "Dislikes removed" , "Shares" , "Comments" , "Favorites" , "Favorites added" , "Favorites removed" , "Videos in playlists" , "Videos added to playlists" , "Videos removed from playlists" ) )