knitr::opts_chunk$set(echo = FALSE, warning = FALSE, message = FALSE) here::i_am("CV-KS-Hyndman/CV-KS-Hyndman.Rmd") library(here) library(readr) library(vitae) library(tibble) source(here("R/latex_helper.R"))
cv <- read_rds(here("data/cv_raw.Rds"))
cv$work %>% detailed_entries( what = Title, with = Unit, when = glue::glue("{Start_yr} - {End_yr}") )
cv$edu %>% mutate(Details = latex_color(Details, "gray", .na = "")) %>% detailed_entries(what = Degree, when = glue::glue("{Start_yr} - {End_yr}"), with = Institution, where = Details, .protect = FALSE )
cv$nl2 %>% detailed_entries( what = Step, when = Yr, why = Text )
cv$acad %>% mutate(link = latex_hyperlink("Link", Certificate), link = paste0("--- Certificate: ", link))
cv$acad[1:3, ] %>% mutate(link = latex_hyperlink("Link", Certificate, color = "purple"), prefix_link = latex_color("--- Certificate: ", color = "gray"), full_link = paste0(prefix_link, link) ) %>% detailed_entries( what = Title, with = By, where = full_link, when = Yr, .protect = F )
cv$acad[4, ] %>% detailed_entries( what = Title, with = By, when = Yr, .protect = T )
cv$otherTr %>% mutate(prefix_link = latex_color("--- Certificate: ", color = "gray")) %>% mutate(link = latex_hyperlink("Link", Certificate, color = "purple"), full_link = paste0(prefix_link, link) ) %>% mutate( By = latex_hyperlink(By, By_link, color = "black") ) %>% detailed_entries( what = Title, with = By, where = full_link, when = Yr, .protect = F )
cv$elective %>% detailed_entries( what = Title, with = Where, when = Yr )
cv$research %>% detailed_entries( what = Title, with = glue::glue("With: {With}"), when = Status )
\hfill\break
| During my internship at the Physiology Department, I have developed various web applications in order to automate tasks and improve workflows that belong to these categories:
\hfill\break
app_latex <- cv$app %>% mutate(text = latex_hyperlink(latex_bold(Name), Link, color = "purple")) %>% dplyr::pull(text) cv$app
r app_latex[1]
r app_latex[2]
r app_latex[3]
r app_latex[4]
r app_latex[5]
.txt
to single Excel table for further data analysis.\hfill\break
\hfill\break
Exploratory Data Analysis using \textcolor{purple}{tidyverse packages}
Inferential Statistics using \textcolor{purple}{rstatix package}
Supervised Learning using Linear Regression, Spline and Logistic Regression
Unsupervised Learning using Principal Component Analysis
Web application using \textcolor{purple}{shiny package}
Programming Environment using \textcolor{purple}{RStudio} and \textcolor{purple}{R Markdown}
\vfill
### Create a Footer and Place in \rfoot{} footer <- paste0( latex_color("Source code of this document can be found in ", "gray"), latex_hyperlink("Github", "https://github.com/Lightbridge-KS/CV", color = "purple" ) ) footer
\rfoot{r footer
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.