# Visual Analytics 2016-2017 - Assignment #1
# Name: INSERT YOUR NAME HERE


# Import the library for loading web pages
library(rvest)


# Assignment 1.1 - Write a function to fetch and save all
# of the vispubdata pages found here: 
vispubdata_root <- 'https://www.lri.fr/~isenberg/VA/vispubdata'
vispubdata_first <- 'https://www.lri.fr/~isenberg/VA/vispubdata/pub_output_0.html'



fetch_vispubdata_pages <- function(){
  print('TODO: Fetch vispubdata pages and save them locally')
  #also find the link to the next page here and save all of them in a loop
 
}

# Assignment 1.2 - Write a function that processes all
#  of the saved vispubdata files and produces a CSV
process_vispubdata_pages <- function(){
  #TODO: Process vispubdata pages from the files you saved. Store all the information per paper on the page
  print('TODO: Process vispubdata pages to a CSV')
}



fetch_vispubdata_pages()
process_vispubdata_pages()