forked from agistaterre/mov-around
-
Notifications
You must be signed in to change notification settings - Fork 0
/
params.R
30 lines (22 loc) · 991 Bytes
/
params.R
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
########
# Sensor list
########
# /!\ The order of the following lists is important, as it links sensor ids to their names /!\
sensor_ids <- c(9000002156, 9000001906, 9000001618,9000003090,9000002453,9000001844,
9000001877,9000002666,9000002181,9000002707,9000003703,
9000003746,9000003775,9000003736,9000004971,9000004130,
9000004042,9000004697)
sensor_names <- c("Burel-01","Leclerc-02","ParisMarche-03","rueVignes-04","ParisArcEnCiel-05","RteVitre-06",
"RueGdDomaine-07","StDidierNord-08","rueVallee-09","StDidierSud-10","RuePrieure-11",
"RueCottage-12","RueVeronniere-13","RueDesEcoles-14","RueManoirs-15","RueToursCarree-16",
"PlaceHotelDeVille-17","BoulevardLiberte-18")
########
# Starting and ending dates
########
starting_date <- "2021-01-01"
ending_date <- Sys.Date()
########
# Key handling
########
key <- Sys.getenv("TELRAAM_KEY")
telraamStats::set_telraam_token(key)