Leaflet : problème affichage dans fonction
Bonjour,
Dans RStudio si j'appelle AfficheHommeFemme() ma carte apparaît dans le viewer
Si j'appelle MenuTest(), puis choix 1 aucun affichage n'apparaît
La seule différence c'est que l'exécution de ma fonction n'est pas terminée.
Quelqu'un a-t-il une solution???
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
| AfficheHommeFemme <- function()
{
carte <<- leaflet() %>%
fitBounds(-5,51,9,42) %>%
addTiles()
carte
}
MenuTest <- function()
{
repeat
{
choix<-menu(choices=c("Statistiques sur les tumeurs", "Statistiques sur la circulation", "Statistique xxx"),title="Menu principal")
if (choix==1) AfficheHommeFemme()
if (choix==2) AfficheFemmeFemme()
if (choix==3) AfficheYYY()
if (choix==0) break
}
} |
Merci de votre aide
Cordialement
