Update influenza-like-illness-analysis.Rmd

module3/exo1/influenza-like-illness-analysis.Rmd

@@ -26,6 +26,12 @@ The data on the incidence of influenza-like illness are available from the Web s
 ```{r}
 data_url = "http://www.sentiweb.fr/datasets/incidence-PAY-3.csv"
 ```
+```{r}	
+data_csv = "grippal.csv"	
+if (!file.exists(data_csv)) {	
+    download.file(data_url, data_csv, method="auto")	
+}	
+```
 
 This is the documentation of the data from [the download site](https://ns.sentiweb.fr/incidence/csv-schema-v1.json):
 
@@ -42,11 +48,11 @@ This is the documentation of the data from [the download site](https://ns.sentiw
 | `geo_insee`  | Identifier of the geographic area, from INSEE https://www.insee.fr                                                        |
 | `geo_name`   | Geographic label of the area, corresponding to INSEE code. This label is not an id and is only provided for human reading |
 
-### Download
+### Reading CSV
 
 The first line of the CSV file is a comment, which we ignore with `skip=1`.
 ```{r}
-data = read.csv(data_url, skip=1)
+data = read.csv(data_csv, skip=1)
 ```
 
 Let's have a look at what we got: