Skip to content

Instantly share code, notes, and snippets.

@statnmap
Last active August 2, 2021 09:20
Show Gist options
  • Save statnmap/226e7858f4f585e6fee6a1e579f74a64 to your computer and use it in GitHub Desktop.
Save statnmap/226e7858f4f585e6fee6a1e579f74a64 to your computer and use it in GitHub Desktop.
Thank GitHub contributors in your articles
# Thanks for article
library(purrr)
library(gh)
repos <- gh("/repos/statnmap/gitlabr/stats/contributors")
map(repos, "author") %>% map("login")
map_chr(repos, ~paste0(
# "[&#x0040;", # With @ before
"[",
pluck(.x, "author", "login"),
"](",
pluck(.x, "author", "html_url"),
")"
)
) %>%
glue::glue_collapse(sep = ", ", last = " and ")
# [statnmap](https://github.com/statnmap), [KevCaz](https://github.com/KevCaz), [JiaxiangBU](https://github.com/JiaxiangBU), [RLesur](https://github.com/RLesur) and [jirkalewandowski](https://github.com/jirkalewandowski)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment