# Put files to Snowflake Bucket.r

root_bucket <- "bi-snowflake/snowflakedata/spotify"

## FROM OTHER FILES: 
#    subfolder_for_featuredplaylists <- "featured_playlists_raw_json"
#    subfolder_for_playlists <- "playlists_raw_json"

csv_subfolder_for_featuredplaylists <- "featured_playlists_parsed_csv"
csv_subfolder_for_playlists <- ???


s3.p(csv_subfolder_for_featuredplaylists, root=root_bucket)
s3://
reveal(s3.p)
files_to_ship <- dir(data.p(csv_subfolder_for_featuredplaylists), full = TRUE) [ 1: 12]


folder <- data.p(csv_subfolder_for_featuredplaylists, "20151212")