1 Infobulle (tooltip)

library(`ggplot2`)
g <- ggplot(quakes2, aes(x = long, y = lat, color = depth)) + 
  coord_quickmap() # coord_quickmap() permet d'avoir des axes sur la même échelle
# On crée basiquement le cadre du graphique avec la fonction ggplot() de `ggplot2`.

my_gg <- g + geom_point_interactive(aes(tooltip = stations), size = 2)
# Voir la description de cette ligne de commande juste en dessous du graphique.
ggiraph(code = print(my_gg))
# Cette ligne de commande va "activer" l'animation. Sans elle, le graphe est inerte.

my_gg <- g + geom_point_interactive(aes(tooltip = stations), size = 2)

ggiraph(code = print(my_gg), 
        tooltip_extra_css = "background-color:gray;color:white;font-style:italic;padding:10px;border-radius:10px 20px 10px 20px;",
        tooltip_opacity = 0.75)

2 Surbrillance (data_id)

my_gg <- g + geom_point_interactive(aes(data_id = stations), size = 2)
ggiraph(code = print(my_gg))

my_gg <- g + geom_point_interactive(aes(data_id = stations), size = 2)
ggiraph(code = print(my_gg), hover_css = "cursor:pointer;fill:red;stroke:gray;stroke-width:2pt;")

3 Ouverture de page (onclick)

La dernière fonctionnalité du package ggiraph que nous présenterons consiste en l’ouverture de fenêtres Internet par un simple clic sur un élément du graphique (encore une fois, dans notre exemple, sur un point du graphique de dispersion).

Bien que l’on puisse amener l’utilisateur à ouvrir n’importe quelle page Internet en un simple clic, l’insertion d’une telle interaction sur un graphique doit ajouter une plus-value aux résultats présentés, sans quoi son utilisation serait quelque peu banale et anodine. Dans le jeu de données quakes, par exemple, on présente l’information concernant la latitude et la longitude de certains séismes. Il nous est alors possible d’ouvrir la page de Google Maps correspondant à ces données de localisation afin que l’utilisateur puisse situer l’emplacement de ces séismes sur une carte du Monde en cliquant sur un point.

Voyons cela de plus près :

quakes2$position <- paste0(quakes2$lat, ",", quakes2$long,  ",5z")
# On crée une chaîne de caractères, qui correspond à la fin de l'URL de Google Maps
# pour des données de latitude et longitude. Le 5z correspond à l'altitude.

quakes2$Instruclick <- sprintf("window.open(\"%s%s\")",
        "https://www.google.ca/maps/search/map/@", as.character(quakes2$position))
# On crée une nouvelle colonne dans le data_frame quakes2 intitulée "Instruclick".
# Quand l'utilisateur cliquera sur un point du graphe, R ira chercher l'instruction à suivre dans cette colonne.

g <- ggplot(quakes2, aes( x = long, y = lat, color = depth)) + coord_quickmap()
# On recrée une base du plot.

my_gg <- g + geom_point_interactive(aes(onclick = Instruclick), size = 2)
ggiraph(code = print(my_gg))

Pour effectuer cette opération, on attribut l’argument onclick à la fonction geom_pont_interactive(). On lui assigne alors l’instruction à effectuer. Ici, c’est dans la colonne Instruclick qu’il la trouve. Elle lui indique d’ouvrir une page à l’URL suivant : https://www.google.ca/maps/search/map/@“Latitude”,“Longitude”,5z

ATTENTION : Il faut que le graphique soit visualisé depuis un navigateur Internet pour que l’animation onclick fonctionne ! En fait, avec cette commande, R tente d’ouvrir une page depuis sa fenêtre active. Si l’utilisateur tente d’ouvrir une page Internet, soit une URL, a partir de R, cela ne fonctionnera forcément pas. Toutefois, si le graphique est visualisé depuis un navigateur Web (Explorer, Chrome ou Firefox par exemple), l’argument onclick permettra d’ouvrir une page Internet à partir d’une nouvelle fenêtre du navigateur utilisé et le résultat souhaité s’affichera.

4 Combinaison d’arguments

Maintenant que nous avons vu les trois possibilités qu’offrait le package ggiraph, sachez qu’il est tout à fait possible et pertinent de les utiliser en même temps. En effet, la combinaison des trois types d’information interactive complète parfaitement un graphique.

my_gg <- g + geom_point_interactive(aes(tooltip = stations,
                                        data_id = stations,
                                        onclick = Instruclick), size = 2)

# Option des arguments
options_tooltip <- "background-color:gray;color:white;font-style:italic;padding:7pt"
options_hover_css <- "fill:pink;stroke:gray;"
ggiraph(code = print(my_gg), 
        tooltip_extra_css=options_tooltip, 
        tooltip_opacity = 0.75, 
        hover_css=options_hover_css)

5 Argument zoom

Il est bien de mentionner l’argument “zoom” qui est un argument supplémentaire utilisable dans la fonction ggiraph(). En effet, cet outil permet à l’utilisateur du graphique interactif de zoomer afin d’obtenir un focus précis sur les données qui l’intéressent.

L’argument zoom est simple à utiliser. Voilà donc un exemple :

my_gg <- g + geom_point_interactive(aes(data_id = stations), size = 2)
# Prenons pour exemple un graphique simple faisant intervenir la surbrillance 
# (facultative à l'option zoom)

# Voici donc comment utiliser l'argument zoom
ggiraph(code = print(my_gg), zoom_max = 5)

Comme on peut le constater, trois icônes apparaissent au-dessus du graphique, ce qui nous permet d’utiliser le zoom, de le retirer ou de naviguer à travers le graphique en conservant un focus sur certaines données. Il s’agit d’une option facultative qui amène toutefois à l’utilisateur l’option d’explorer le graphique de façon plus agréable, spécialement lorsqu’il s’agit de nuages de points ou d’histogrammes contenants un grand nombre de données.

6 Application dans d’autres types de graphiques

Comme mentionné, le package ggiraph s’applique à plusieurs types de graphique, par l’entremise des fonctions geom() précédemment listées. Dans le but de faciliter l’explication du package étudié, nous avons jusqu’ici utilisé le même graphique de dispersion pour chacun de nos exemples.

Maintenant, afin d’illustrer le tout, nous présenterons dans cette section quelques exemples supplémentaires d’utilisation de la fonction ggiraph() avec d’autres types de graphiques, soit les suivants:

• Diagramme à bandes (geom_bar_interactive())

g_bar <- ggplot(quakes2, 
                aes(x = magFactor,
                    tooltip = region,
                    fill = magFactor,
                    data_id = magFactor)) + 
  geom_bar_interactive()
ggiraph(code = print(g_bar))

Le graphique ci-dessus permet de bien exploiter les outils tooltip et data_id. Toutefois, il est impossible d’y mettre l’argument onclick permettant d’ajouter un lien interactif vers une page Web.

• Diagramme en boîte à moustaches (geom_boxplot_interactive())

p <- ggplot(quakes2, 
            aes(x = region,
                y = mag,
                tooltip = mag,
                fill=region)) +
  geom_boxplot_interactive() +
  xlab("Région") +
  ylab("Magnitude") +
  theme(legend.position="none")
ggiraph(code = print(p))

Le diagramme en boîte à moustaches, quant à lui, permet uniquement d’ajouter l’option d’infobulle. De plus, dans notre exemple, comme l’argument assigné à tooltip est la magnitude, seuls les points en dehors des boîtes ont une infobulle assignée.

• Diagramme en lignes (geom_line_interactive())

Line_graph <- ggplot(quakes2, 
                     aes(x = stations, y=mag,
                         group = region,
                         colour = region,
                         tooltip = region,
                         data_id=region)) +
  geom_line_interactive() + 
  xlab("Nombre de stations") +
  ylab("Magnitude") +
  theme(legend.position="none")
ggiraph(code = print(Line_graph) )

Le diagramme en lignes des nombres de stations en fonction de la magnitude a pour options les arguments tooltip et data_id. tooltip permet de distinguer la région de chacune des lignes tandis que la surbrillance permet de mieux les visualiser. Par ailleurs, comme pour les graphiques créés par les fonctions geom_bar_interactive() et geom_boxplot_interactive(), l’histogramme en question ne permet pas l’ajout de l’option onclick.

7 Avis personnel

7.2 Ergonomie du package

De manière générale, le package est plutôt simple à prendre en main. Il faut simplement choisir la fonction à utiliser en fonction du graphique que l’on souhaite animer, puis choisir les arguments à donner selon l’animation désirée.

Certaines animations sont peut-être plus difficiles à rendre pertinentes, comme l’ajout d’un lien Internet, qui ne s’applique pas forcément à tous les jeux de données.

Mais la surbrillance permet vraiment de discerner les points les uns des autres dans le cas d’un nuage de point un peu trop chargé et l’infobulle est juste extraordinaire dans le sens où elle peut donner des informations très utiles pour chacun des points observés, ce qui aiderait à faire une analyse de qualité du graphique.