mtmx

library(tidyverse)
library(data.table)
library(sf)

#### liste des stades (ou d'autres points d'interet)
liste_stades <- tribble(
  ~poi,~x,~y, ~col_1, ~col_2,
  "Vélodrome" , 894600 , 6244146, "#0098d4","#be945c",
  "Geoffroy Guichard" , 808638 , 6485545, "#009337","#cddbcc",
  "Saint Symphorien" , 930636 , 6894610, "#6d1619","#e2cecd",

mtmx

library(data.table)
library(tidyverse)
library(sf)
library(rmapshaper)

# contours france
frmet <- st_read("https://raw.githubusercontent.com/gregoiredavid/france-geojson/master/departements.geojson") %>%
  st_transform(2154) %>%
  summarise() %>%
  ms_simplify(keep = 0.01)

mtmx

library(devtools)
#install_github("tylermorganwall/rayshader")
library(rayshader)
library(magrittr)
library(tidyverse)
library(sf)
library(raster)
library(rgeos)
library(rgl)
library(rgdal)  

mtmx

# chargement librairies ####

library(rnaturalearth)
library(tidyverse)
library(sf)
library(data.table)
library(packcircles)
library(janitor)
library(readxl)
library(rmapshaper)

mtmx

# chargement librairies
library(tidyverse)
library(data.table)
library(stringr)

# doc
http://www.football-data.co.uk/notes.txt

# fonction pour télécharger fichiers par saison
import <- function(saison) {

mtmx

#########################
# http://www.masalmon.eu/2017/11/16/wheretoliveus/
# version FR

# liste des aéroports de France
library("rvest")
library(tidyverse)
library(magrittr)
library(stringr)

mtmx

## chargement des libraires

library(tidyverse)
library(magrittr)
library(sf)
library(readxl)
library(data.table)
library(janitor)
library(stringr)
library(scales)