cv.Rmd

---
title: "JP Flores' CV"
author: JP Flores
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: false
knit: pagedown::chrome_print
---

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

library(glue)
library(tidyverse)

# ======================================================================
# These variables determine how the the data is loaded and how the exports are
# done.

# Is data stored in google sheets? If no data will be gather from the csvs/
# folder in project
using_googlesheets <- TRUE

# Just the copied URL from the sheet
positions_sheet_loc <- "https://docs.google.com/spreadsheets/d/1kzVjmxlzmNsFXYa_A9A6OpZcMWZC1zOY62Ra5Xd9OPE/edit?usp=sharing"

# Is this sheet available for anyone to read? If you're using a private sheet
# set this to false and go to gather_data.R and run the data loading manually
# once to cache authentication
sheet_is_publicly_readable <- TRUE

# Is the goal of this knit to build a document that is exported to PDF? If so
# set this to true to have links turned into footnotes at the end of the
# document
PDF_EXPORT <- FALSE


CV_PDF_LOC <- "https://github.com/jpflores-13/cv/raw/master/cv.pdf"
CV_HTML_LOC <- "https://jpflores-13.github.io/cv/cv.html"


# A global (gasp) variable that holds all the links that were inserted for
# placement at the end
links <- c()

# ======================================================================
# Now we source two external scripts. One contains functions for building the
# text output and the other loads up our data from either googlesheets or csvs

# Functions for building sections from CSV data
source('parsing_functions.R') 

# Load data for CV/Resume
source('gather_data.R')
```



```{r}
# When in export mode the little dots are unaligned, so fix that. 
if(PDF_EXPORT){
  cat("
  <style>
  :root{
    --decorator-outer-offset-left: -6.5px;
  }
  </style>")
}
```

<div class="header-block">
  <div class="header-block-inner">
  <div class="title">JP Flores</div>
  

  </div>
</div>

<div class = "subtitle">

```{r intro}
  print_text_block(text_blocks, 'intro')
```
</div>

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

![logo](logo.jpeg){width=90%}

```{r}
# When in export mode the little dots are unaligned, so fix that. 
if(PDF_EXPORT){
  glue("View this CV online with links at _{CV_HTML_LOC}_")
} else {
  glue("[<i class='fas fa-download'></i> Download CV as a PDF]({CV_PDF_LOC})")
}
```

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



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

<i class="fab fa-r-project"></i>

<!--i class="fab fa-html5"></i--> HTML

<!--i class="fab fa-css3-alt"></i--> CSS

<!--i class="fas fa-code-branch"></i--> Git

<!--i class="fab fa-adobe"></i--> Photoshop

<!--i class="fab fa-adobe"></i--> Illustrator


Disclaimer {#disclaimer}
--------------------------------------------------------------------------------

Made with the R package [**pagedown**](https://github.com/rstudio/pagedown). 

Source code available: [github.com/jpflores-13/cv](https://github.com/jpflores-13/cv).

Updated: `r Sys.Date()`.


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

JP Flores {#title}
--------------------------------------------------------------------------------

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

```{r}
print_section(position_data, 'education')
```

Research Experience {data-icon=laptop}
--------------------------------------------------------------------------------

```{r}
print_section(position_data, 'research_experience')
```

Professional Experience {data-icon=user-tie}
--------------------------------------------------------------------------------

```{r}
print_section(position_data, 'professional_experience')
```

Awards & Accolades {data-icon=trophy}
--------------------------------------------------------------------------------

```{r}
print_section(position_data, 'awards_accolades')
```


Features & Interviews {data-icon=microphone}
--------------------------------------------------------------------------------

```{r}
print_section(position_data, 'features_interviews')
```

Teaching Experience {data-icon=chalkboard-teacher}
--------------------------------------------------------------------------------

::: aside
```{r}
print_text_block(text_blocks, 'teaching_experience_aside')
```
:::

```{r}
print_section(position_data, 'teaching_experience')
```
Training & Certifications {data-icon=medal}
--------------------------------------------------------------------------------

```{r}
print_section(position_data, 'training')
```

Academic Articles {data-icon=book}
--------------------------------------------------------------------------------


::: aside
```{r}
print_text_block(text_blocks, 'academic_aside')
```
:::

```{r}
print_section(position_data, 'academic_articles')
```

Non-Academic Articles {data-icon=bookmark}
--------------------------------------------------------------------------------

```{r}
print_section(position_data, 'non_academic_articles')
```

Invited Talks {data-icon=microphone-alt}
--------------------------------------------------------------------------------

```{r}
print_section(position_data, 'invited_talks')
```

Poster Presentations {data-icon=microphone-alt}
--------------------------------------------------------------------------------

```{r}
print_section(position_data, 'poster_presentations')
```

Service {data-icon=heart}
--------------------------------------------------------------------------------

```{r}
print_section(position_data, 'service')
```




```{r}
if(PDF_EXPORT){
  cat("
  
Links {data-icon=link}
--------------------------------------------------------------------------------

<br>


")
  
  walk2(links, 1:length(links), function(link, index){
    print(glue('{index}. {link}'))
  })
}
```