---
title: "Kyle Belanger's resume"
author: Kyle Belanger
date: "`r Sys.Date()`"
output:
  pagedown::html_resume:
    css:
      - css\styles.css
      - resume
    # set it to true for a self-contained HTML page but it'll take longer to render
    self_contained: true
# uncomment this line to produce HTML and PDF in RStudio:
#knit: pagedown::chrome_print
---


```{r include=FALSE}
knitr::opts_chunk$set(
  results = 'asis'
  ,echo = FALSE
)

library(tidyverse)
library(glue)

PDF_EXPORT <- FALSE


links <- c()

source('parsing_functions.R') 
source('gather_data.R')


position_data <- position_data %>% 
  filter(in_resume)
  

```


Aside
================================================================================

```{r out.width='80%'}
knitr::include_graphics(here::here("images", "IMG_0387.jpg"))
```


<!-- ![Kyle Belanger](images/IMG_0387.JPG){width=80%} -->


Contact Info {#contact}
--------------------------------------------------------------------------------

```{r}

contact_info %>% glue_data("- <i class='fa fa-{icon}'></i> {contact}")


```

- For more information, please contact me via email.


Skills {#skills}
--------------------------------------------------------------------------------

```{r}

build_skill_bars(skills)

```

Experienced Medical Technologist with high skills in data analytics and visualization



Main
================================================================================

Kyle Belanger {#title}
--------------------------------------------------------------------------------

<!-- ### Currently searching for a PhD student position -->

```{r}
print_text_block(text_blocks, "intro")

```


Education {data-icon=graduation-cap data-concise=true}
--------------------------------------------------------------------------------

```{r}
position_data %>% print_section('education')
```


Professional Experience {data-icon=suitcase}
--------------------------------------------------------------------------------

```{r}
position_data %>% print_section('industry')
```



