cv_fr

Author: rempsyc

cv.Rmd

@@ -2,9 +2,9 @@
 name: Rémi
 surname: Thériault
 profilepic: "img/profile.png"
-position: "PhD Student"
-qualifications: "MSc"
-address: "Université du Québec à Montréal, Montréal, Québec, Canada"
+position: "Postdoctoral Fellow"
+qualifications: "PhD"
+address: "New York University, New York, USA"
 phone: (438) 995-7648
 www: remi-theriault.com
 email: "[email protected]"

cv.pdf

@@ -0,0 +1,138 @@
+---
+name: Rémi
+surname: Thériault
+profilepic: "img/profile.png"
+position: "Chercheur postdoctoral"
+qualifications: "PhD"
+address: "New York University, New York, USA"
+phone: (438) 995-7648
+www: remi-theriault.com
+email: "[email protected]"
+twitter: rempsyc
+github: rempsyc
+# linkedin: rempsyc
+
+aboutme: |
+  \RaggedRight Mes intérêts se situent à l’intersection de la psychologie sociale, des neurosciences et de la psychologie positive, et mes recherches se penchent sur le bien-être optimal, la cohésion sociale, et notre rapport à l’environnement. Dans mes recherches postdoctorales, je tente de réduire la polarisation politique via le développement d'identités sociales partagées. Je suis également passionné par la science ouverte, la science reproductible, la métascience et la science des données à l’aide de R (ce CV a aussi été réalisé en R).
+
+date: "`r format(Sys.time(), '%B %Y')`"
+headcolor: "6FA3CE" # my shirt on the profil pic is 839AC4, but we take a bit lighter for better look
+urlcolor: blue
+linkcolor: blue
+output: 
+  vitae::awesomecv:
+    page_total: true
+---
+
+```{r setup, include = FALSE}
+knitr::opts_chunk$set(echo = FALSE, warning = FALSE, message = FALSE)
+
+#######################
+#### SHORT VERSION ####
+#######################
+
+# Whether to print a shortened version of the CV
+short <- FALSE
+
+########################
+#### PACKAGE SETUP #####
+########################
+
+# Required packages
+library(vitae)
+library(dplyr)
+
+# For Google scholar data/visualization
+library(scholar)
+library(ggplot2)
+library(forcats)
+library(patchwork)
+library(see)
+library(rsvg)
+library(kableExtra)
+
+# To format links throughout the CV
+source("files/format_links.R")
+
+########################
+#### GOOGLE SCHOLAR ####
+########################
+
+# Specify your Google scholar profile
+scholar.profile <- "NrfwEncAAAAJ" # Get it from your Google Scholar profile URL
+
+# Specify your Google scholar short author name
+author.name <- "rém thériault"
+# Note: correct name may vary (e.g., if you inconsistently used middle name initials)
+# Dominique Makowski's was simply "d makowski", so the pattern is unclear 
+# But usually it seems 1-3 letters from first name plus full last name
+
+# When in doubt, the correct author name can be obtained through:
+# source("files/get_scholar_name.R") # (after defining 'scholar.profile' above)
+
+# Name inconsistencies should be corrected manually in file 'files/make_data_impact.R' (lines 14-16).
+
+########################
+##### INSTRUCTIONS #####
+########################
+
+# Change the order of sections below as desired.
+# Edit the individual files ("childs") to edit the content as desired.
+# Add `eval = !short` to code chunks to make them optional for the short version
+
+# See all instructions and tips here: https://github.com/rempsyc/cv
+
+```
+
+```{r Education parent, child=c('fr/sections/education.Rmd')}
+```
+
+```{r Publications parent, child=c('fr/sections/publications.Rmd')}
+```
+
+```{r Software parent, child=c('fr/sections/software.Rmd')}
+```
+
+```{r Grants parent, child=c('fr/sections/grant.Rmd')}
+```
+
+\pagebreak
+
+```{r Awards parent, child=c('fr/sections/awards.Rmd')}
+```
+
+```{r Teaching parent, child=c('fr/sections/teaching.Rmd')}
+```
+
+```{r Preprints parent, child=c('fr/sections/preprints.Rmd'), eval = !short}
+```
+
+```{r Invited talks parent, child=c('fr/sections/invited_talks.Rmd'), eval = !short}
+```
+
+```{r Conference talks parent, child=c('fr/sections/conference_talks.Rmd'), eval = !short}
+```
+
+```{r Conference posters parent, child=c('fr/sections/conference_posters.Rmd'), eval = !short}
+```
+
+```{r Academic service parent, child=c('fr/sections/service.Rmd'), eval = !short}
+```
+
+```{r Blogs parent, child=c('fr/sections/blogs.Rmd'), eval = !short}
+```
+
+```{r Media coverage parent, child=c('fr/sections/media_coverage.Rmd'), eval = !short}
+```
+
+```{r Other experience parent, child=c('fr/sections/other_experience.Rmd'), eval = !short}
+```
+
+```{r Leadership parent, child=c('fr/sections/leadership.Rmd'), eval = !short}
+```
+
+```{r Varia parent, child=c('fr/sections/varia.Rmd'), eval = FALSE}
+```
+
+```{r credit parent, child=c('fr/sections/credit.Rmd'), eval = FALSE}
+```

cv_fr.Rmd

@@ -172,9 +172,16 @@ plot_citations_per_paper <- function(data_scholar) {
 # Define table_impact function
 table_impact <- function(data_scholar, 
                          author.name = author.name, 
-                         scholar.profile = NULL) {
+                         scholar.profile = NULL,
+                         language = "EN") {
   # gs_profile <- paste0("https://scholar.google.com/citations?user=", scholar.profile)
   # gs_profile_URL <- link("Google Scholar Profile", gs_profile)
+  if (language == "EN") {
+    caption <- "Figure and table automatically updated through my"
+  } else if (language == "FR") {
+    caption <- "Figure et tableau mis à jour automatiquement via mon"
+  }
+  
   gs_profile_URL <- "Google Scholar Profile"
   get_stats(data_scholar = data_scholar, author.name = author.name) |>
     knitr::kable(
@@ -195,6 +202,6 @@ table_impact <- function(data_scholar,
       position = "center", font_size = 8, latex_options = "hold_position") %>% 
     kableExtra::add_footnote(
       paste(
-        "Figure and table automatically updated through my", gs_profile_URL),
+        caption, gs_profile_URL),
       notation = "symbol")
 }