Les robots qui retweetent les tweets #rspatial et #BioImageAnalysis fonctionnent bien. Il est maintenant temps d’ajouter un peu de fonctionnalités avec le meilleur tweet retweeté du mois, une fonction ajoutée au paquet {tweetrbot}.
L’été dernier, avec Marion Louveaux, nous avons créé deux robots Twitter qui retweet #rspatial et #BioImageAnalysis. C’est notre façon de récupérer les nouvelles de nos communautés préférées. Si vous êtes intéressés, j’ai présenté dans cet article de blog comment “Créer un \[tel\] robot twitter sur un Raspberry Pi 3 avec R” J’ai spécialement créé le package {tweetrbot} pour que mon Raspberry Pi s’occupe de cette tâche de retweet. Aujourd’hui, j’ai ajouté une petite fonctionnalité qui permettra de tweeter un résumé mensuel.
Récupérer tous les tweets avec #rspatial
Inspiré par les posts de Marion sur l’“analyse de données Twitter avec R”, j’ai décidé qu’il était temps de commencer à utiliser les données stockées par nos robots. En effet, les fonctions de {tweetrbot} stockent tous les tweets avec leur hashtag respectif dans un fichier .rds.
J’ai ajouté l’état actuel du jeu de données #rspatial dans le package.
file <- system.file("complete_tweets_rspatial.rds", package = "tweetrbot")
all_tweets <- read_rds(file)
all_tweets %>%
select(created_at, screen_name, text)## # A tibble: 957 x 3
## created_at screen_name text
## <dttm> <chr> <chr>
## 1 2020-05-09 22:58:06 mdsumner "#rstats #rspatial I georeferenced volcano, …
## 2 2020-05-05 00:04:52 mdsumner "polylidar C++ lib for points (not just lida…
## 3 2020-05-09 05:25:25 mdsumner "#rspatial #rstats @edzerpebesma how does on…
## 4 2020-05-09 08:11:15 cfcoverdale "Playing around with #Rspatial sets - took a…
## 5 2020-05-09 04:59:26 maurosc3ner "Relative risk for COVID-19 as an underlying…
## 6 2020-05-04 08:32:11 maurosc3ner "Relative risk of anemia among women in Sub-…
## 7 2020-05-08 21:29:21 FisherRick "@geomenke @dmfenton @billdollins 🤣🤣🤣 so doe…
## 8 2020-05-08 16:58:04 BeckyC85 "I am \U0001f90f to giving up on R forever! …
## 9 2020-05-08 04:06:31 LuisDVerde "🇦🇶High latitude maps in R. Example with sea…
## 10 2020-05-07 21:47:39 StatnMap "Also you can ask your R map questions using…
## # … with 947 more rowsTrouvez le tweet le plus retweeté et autres explorations
Si vous voulez explorer ce jeu de données un peu plus en détail, n’hésitez pas ! Les articles de Marion peuvent vous inspirer sur la façon d’explorer un tel jeu de données Twitter : “Analyse de données Twitter avec R”, “Analyse des profils utilisateurs et relations entre utilisateurs” et “Exploration du contenu des tweets”.
Dans {tweetrbot}, j’ai décidé de montrer le nombre quotidien de contributeurs, les tweets les plus retweetés et les comptages du mois. Pour ça, j’utilise la fonction top_tweets(). Ici, je mets post_tweet = FALSE parce que je ne veux pas que mon article de blog tweet réellement. Le bot l’a déjà fait.
Voici les médias du tweet :
# remotes::install_github("statnmap/tweetrbot")
library(tweetrbot)
output <- top_tweets(all_tweets = all_tweets, post_tweet = FALSE, top_number = 5)
output$number_contributors
output$number_tweets
output$top_retweet
Et voici le texte du tweet :
output$text_tweetSummary of April #rspatial: 195 tweets, 84 different contributors.
Most retweeted #rspatial: https://twitter.com/jakub_nowosad/status/1251872204012302337 by @jakub_nowosad.Régler le Raspi pour exécuter le script tous les mois
Comme dans “Créer un robot twitter sur un Raspberry Pi 3 avec R”, nous utiliserons cron pour tweeter régulièrement.
Créez le script R qui sera exécuté par CRON.
bash
mkdir ~/talk_rspatial
cd ~/talk_rspatial
vim rtweet_summary.RRemplissez le fichier avec le code R. Celui-ci permet de lire les données recueillies par la fonction get_and_store() et de créer le contenu du tweet.
R
library(tweetrbot)
# Most retweets
all_tweets <- readRDS("~/talk_rspatial/complete_tweets_rspatial.rds")
# Tweet this
top_tweets(all_tweets = all_tweets, post_tweet = TRUE, top_number = 5)Permettre au Raspi de créer des graphiques
Le Raspi est un serveur sans interface graphique. Vous ne pouvez pas créer directement des graphiques en R sur un serveur distant. Le Raspi ne fait pas exception à la règle. Si vous essayez, vous pouvez obtenir le message suivant :
Error in X11(paste("png::", filename, sep = ""), g$width, g$height, pointsize, :
unable to start device PNG
Calls: png
In addition: Warning message:
In png("test.png", width = 900, height = 400) :
unable to open connection to X11 display ''
Execution haltedIl existe une solution. Comme répondu par Dirk Eddelbuettel sur SO, vous pouvez exécuter R avec le serveur virtuel framebuffer X11. Vous devrez d’abord l’installer :
bash
sudo apt install xvfb xauth xfonts-basePuis exécuter xvfb-run R --no-save pour lancer le script R qui crée les graphiques. De plus, avec {ggplot2}, vous pouvez faire face à des erreurs du type :
#> X11 font -adobe-helvetica-%s-%s---%d-------*, face 2 at size 11 could not be loadedD’après la réponse sur askubuntu, vous pourriez devoir installer :
bash
sudo apt-get install t1-xfree86-nonfree ttf-xfree86-nonfree ttf-xfree86-nonfree-syriac xfonts-75dpi xfonts-100dpiMettre en place le CRON
Configurez CRON pour exécuter votre script une fois par mois et tweeter le top du mois précédent.
bash
sudo crontab -e
# if you want to run for a specific user
crontab -u yourusername -e Dans le fichier crontab qui s’ouvre, vous pouvez ajouter une commande de la forme suivante :
Minute Hour Day-of-Month Month Day-Of-Week CommandVous pouvez configurer le crontab pour qu’il lance le script le premier jour de chaque mois à 10h00 (* pour tous) :
0 10 1 * * sudo xvfb-run $HOME/R/bin/Rscript ~/talk_rspatial/rtweet_summary.R
Un nouveau bot Twitter dans la famille
Lors de la rédaction du premier article “Créer un robot twitter sur un Raspberry Pi 3 avec R”, j’ai créé @talk_rspatial qui retweete les tweets #rspatial et @talk_BioImg qui retweete les tweets #BioImageAnalysis.
Ce nouvel article voit la naissance de @talk_rstatsfr qui retweete les tweets #RstatsFR. J’espère que ça va encore renforcer les liens de cette communauté francophone R déjà très active. Si vous parlez de R en français, utilisez #rstatsFR pour être retweeté par le bot. Et suivez le bot @talk_rstatsfr pour vous tenir au courant de ce qui se passe dans cette communauté R francophone !
On se retrouve sur twitter ?
Citation :
Merci de citer ce travail avec :
Rochette Sébastien. (2020, May. 16). "Trouver le plus retweeté des tweets du bot #rspatial". Retrieved from https://statnmap.com/fr/2020-05-10-trouver-le-plus-retweete-des-tweets-du-bot-rspatial/.
Citation BibTex :
@misc{Roche2020Trouv,
author = {Rochette Sébastien},
title = {Trouver le plus retweeté des tweets du bot #rspatial},
url = {https://statnmap.com/fr/2020-05-10-trouver-le-plus-retweete-des-tweets-du-bot-rspatial/},
year = {2020}
}