---
name: Mitchell O'Hara-Wild
date: "`r format(Sys.time(), '%B, %Y')`"
profilepic: pic.jpg
www: mitchelloharawild.com
github: mitchelloharawild
linkedin: mitchelloharawild
twitter: mitchoharawild
headcolor: 414141
docname: CV/Resume
output: vitae::awesomecv
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = FALSE, warning = FALSE, message = FALSE)
library(vitae)
```

# Professional Summary

This is a good opportunity to introduce yourself professionally and summarise
why your skills are well suited to the job you are applying for!

# Education

```{r education}
library(vitae)
edu <- tribble(
  ~ degree, ~ start, ~ end, ~ institution, ~ location,
  "Bachelor of Commerce (Honours) (Econometrics)", 2013, 2017, "Monash University", "Clayton",
  "Bachelor of Science (Mathematical Statistics and Computational Science)", 2013, 2016, "Monash University", "Clayton",
)
edu %>%
  detailed_entries(
    what = degree,
    when = glue::glue("{start} - {end}"),
    with = institution,
    where = location
  )
```

# R Packages

```{r rpkgs}
pkgsearch::ps("O'Hara-Wild",size = 100) %>%
  filter(purrr::map_lgl(package_data, ~ grepl("Mitchell O'Hara-Wild", .x$Author, fixed = TRUE))) %>%
  arrange(desc(downloads_last_month)) %>%
  brief_entries(
    what = title,
    when = lubridate::year(date),
    with = description
  )
```

```{r publications}
bibliography_entries("publications.bib", "Publications")
```

