PhD Student studying Computer Engineering specializing in Biologically Inspired Artificial Intelligence at George Washington University.
show(exp_plot)
Eggers, T., Kilgore, J., Green, D., Vrabec, T., Kilgore, K., & Bhadra, N. (2021). Combining direct current and kilohertz frequency alternating current to mitigate onset activity during electrical nerve block. Journal of Neural Engineering, 18(4), 046010. https://doi.org/10.1088/1741-2552/abebed
# Code for Professional Experience Graph
library(ggplot2)
options(repr.plot.width = 20, repr.plot.height = 7, repr.plot.res = 100)
exp <- read.csv("./experience.csv")
exp$Start <- as.Date(paste0(exp$Start, "-01"), "%m-%Y-%d")
exp$End <- as.Date(paste0(exp$End, "-01"), "%m-%Y-%d")
exp$Experience <- sub("/n","\n",exp$Experience)
exp_plot <- ggplot(data=exp)+geom_segment(aes(x=Start,xend=End,
y=reorder(Experience,-Precedence), yend=reorder(Experience,-Precedence)), size=3)+
ggtitle("Professional Experience")+
theme(text = element_text(size=30),
axis.text.x = element_text(angle=35, hjust=1),
axis.text.y = element_text(angle=0, hjust=1),
axis.title.y = element_blank(),
axis.title.x = element_blank())