cv

rempsyc · Feb 29, 2024 · 0c25a54 · 0c25a54
1 parent 07a3a9e
commit 0c25a54
Show file tree

Hide file tree

Showing 15 changed files with 15 additions and 3 deletions.
diff --git a/cv.Rmd b/cv.Rmd
@@ -88,10 +88,10 @@ author.name <- "rém thériault"
 ```{r Publications parent, child=c('sections/publications.Rmd')}
 ```
 
-```{r Grants parent, child=c('sections/grant.Rmd')}
+```{r Awards parent, child=c('sections/awards.Rmd')}
 ```
 
-```{r Awards parent, child=c('sections/awards.Rmd')}
+```{r Grants parent, child=c('sections/grant.Rmd')}
 ```
 
 ```{r Teaching parent, child=c('sections/teaching.Rmd')}

diff --git a/cv.pdf b/cv.pdf
diff --git a/img/correlation.png b/img/correlation.png
diff --git a/img/correlation_monthly.png b/img/correlation_monthly.png
diff --git a/img/easystats.png b/img/easystats.png
diff --git a/img/easystats_monthly.png b/img/easystats_monthly.png
diff --git a/img/effectsize.png b/img/effectsize.png
diff --git a/img/lavaanExtra.png b/img/lavaanExtra.png
diff --git a/img/lavaanExtra_monthly.png b/img/lavaanExtra_monthly.png
diff --git a/img/performance_monthly.png b/img/performance_monthly.png
diff --git a/img/rempsyc.png b/img/rempsyc.png
diff --git a/img/rempsyc_monthly.png b/img/rempsyc_monthly.png
diff --git a/img/report.png b/img/report.png
diff --git a/img/report_monthly.png b/img/report_monthly.png
diff --git a/sections/awards.Rmd b/sections/awards.Rmd
@@ -11,6 +11,15 @@ output: html_document
 ```{r Awards}
 data <- rbind(
 
+    tibble(
+    Name = "Postdoctoral Fellowship (SSHRC)",
+    URL = "",
+    Details = "",
+    Date = "2024-2026",
+    Amount = 90000,
+    Activity = NA,
+    Declined = FALSE),
+    
     tibble(
     Name = "Best Student Paper Award (UQAM)",
     URL = "",
@@ -294,17 +303,20 @@ data <- rbind(
 
 total <- data$Amount
 
+last_year <- max(unlist(strsplit(data$Date, "-")))
+
 data <- data %>% 
     add_row(Name = "Total Amount Offered",
             URL = "",
-            Date = "2011-2022",
+            Date = paste0("2011-", last_year),
             Amount = sum(total),
             Declined = FALSE) %>% 
   mutate(Name = link(paste0("\\hspace{0.5cm} ", Name, "\\dotfill"), URL, color = "333333"),
          Amount = paste0("\\$", scales::label_comma(accuracy = 1)(Amount)),
          Amount = ifelse(Declined == TRUE,
                          paste0("(", Amount, ")"),
                          Amount))
+
 data[nrow(data),1] <- gsub("333333", "6FA3CE", data[nrow(data),1]) #Red: FF0000, but we use same colour as rest
 
 brief_entries(data, Name, Date, Amount, .protect = FALSE)